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MAIS SOBRE PÁGINAS GRÁFICAS 


Retomando alguns pontos básicos sobre as técni- 
cas de paginação gráfica. Limitações da memória. 
As páginas disponíveis em seu microcomputador. 
Páginas gráficas e a exigência de espaço. Arma- 
zenagem das páginas e sua recuperação. Anima- 
ÇÕES GrÁTICAS . crer sup caras rs RN 1141 


AVALANCHE: A ESCALADA 


Animação do personagem. Início da caminhada. 
O momento de saltar. Onde Willie está pisando? 
Verificação dos prêmios. Imobilidade. Passos fa- 
tais. O último suspiro de Willie .............. 1146 


UMA PLANILHA ELETRÔNICA (3) 


Instruções gerais sobre o uso da planilha. Como 
dar entrada às equações. Como fazer cópias ab- 
solutas e relativas. O uso de constantes. Coman- 
dos empregados. Como utilizar o programa. Ins- 
truções especiais para seu micro. Digite a última 
parte do program. ...sccacuu vaso esa 1150 
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PLANO DA OBRA 


K NPUT” é uma obra editada em fascículos semanais, e cada 
conjunto de 15 fascículos compõe um volume. A capa para enca- 
dernação de cada volume estará à venda oportunamente. 


COMPLETE SUA COLEÇÃO 


Exemplares atrasados, até seis meses após o encerramento da coleção, pode- 
rão ser comprados, a preços atualizados, da seguinte forma: 1. PESSOAL 
MENTE — Por meio de seu jornaleiro ou dirigindo-se ao distribuidor local, 
cujo endereço poderá ser facilmente conseguido junto a qualquer jornaleiro 
de sua cidade. Em São Paulo, os endereços são: rua Brigadeiro Tobias, 773, 
Centro; avenida Industrial, 117, Santo André; e no Rio de Janeiro: avenida 
Mem de Sá, 191/193, Centro. 2. POR CARTA — Poderão ser solicitados exem- 
plares atrasados também por carta, que deve ser enviada para DINAP — Dis- 
tribuidora Nacional de Publicações — Números Atrasados — Estrada Velha 
de Osasco, 132, Jardim Teresa — CEP 06000 — Osasco — SP. Não envie pa- 
gamento antecipado. O atendimento será feito pelo reembolso postal e o pa- 
gamento, incluindo as despesas postais, deverá ser efetuado ao se retirar a en- 
comenda na agência do Correio. 3. POR TELEX — Utilize o nº (011)33 670 
DNAP. 

Em Portugal, os pedidos devem ser feitos à Distribuidora Jardim de Publica- 
ções, Lda. — Qta. Pau Varais, Azinhaga de Fetais — 2 685, Camarate — Lis- 
boa; Apartado 57 — Telex 43 069 JARLIS P. 

Atenção: Após seis meses do encerramento da coleção, os pedidos serão aten- 
didos dependendo da disponibilidade do estoque. 

Obs.: Quando pedir livros, mencione sempre título e/ou autor da obra, além 
do número da edição. 
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MAIS SOBRE 


PÁGINAS GR ÁFIC 


Depois de examinar os princípios 

da paginação gráfica, vamos, agora, 
explorar suas possibilidades. 

Os programas deste artigo não deixarão 
dúvidas quanto à sua utilidade. 


Como vimos no artigo da página 
1096, a paginação gráfica — a técnica 
de mostrar várias telas gráficas em se- 
quência — apresenta um grande poten- 
cial em diversos tipos de aplicação. 
Além de seu emprego em animação 
computadorizada, as páginas gráficas 
podem ser úteis em áreas mais “sérias ', 
tais como planilhas financeiras ou quais- 
quer outros projetos que exijam a rápi- 
da mudança de uma tela cheia de infor- 
mações para outra. 

Já tivemos um contato inicial com es- 
sa técnica. Agora, trataremos de exami- 
nar mais de perto suas possibilidades. 
Antes disso, no entanto, convém reca- 
pitular alguns pontos fundamentais. A 
paginação gráfica consiste, basicamen- 
te, em armazenar cada tela em uma par- 
te da memória e depois recuperá-las uma 
a uma. Essas telas podem conter dife- 
rentes tipos de informação: gráficos de 
alta ou baixa resolução, textos, ou até 
uma combinação de ambos. Depois de 
armazenadas, elas podem ser chamadas 
em sequência, sem que se perca tempo 
com o processo de montagem do dese- 
nho. O computador não precisará, por- 
tanto, executar uma série de funções de- 
moradas, como a função SIN, por 
exemplo. Ele apenas transferirá dados 
de uma parte da memória para outra. 

E claro que o processo de montagem 
do desenho continua sendo necessário 
em algum ponto, mas só uma vez para 
cada tela. Depois de prontas, elas po- 
dem ser recuperadas instantaneamente, 
sempre que você quiser. 


LIMITAÇÕES DA MEMÓRIA 





Cada página gráfica requer uma cer- 
ta quantidade de memória. Essa quan- 
tidade varia de acordo com a complexi- 
dade do desenho — quanto mais cores 
forem usadas e quanto maior for a re- 





solução gráfica, mais memória será exi- 
gida. Isso impõe severas limitações aos 
microcomputadores e, em alguns casos, 
temos mesmo que sacrificar um pouco 
a qualidade do desenho para obter mais 
páginas gráficas. 

Tomando as medidas necessárias pa- 
ra economizar memória, você podera 
conseguir bastante espaço para as pági- 
nas. Mas não se esqueça de que o pró- 
prio programa ocupará uma parte des- 
se espaço. Portanto, antes de iniciar os 
trabalhos, calcule cuidadosamente a 
quantidade de memória que você ocu- 
pará com suas telas, Verifique se não é 
aconselhável baixar um pouco a resolu- 
ção do desenho ou diminuir o numero 
de cores. Com o planejamento, você não 
correrá o risco de precisar de mais es- 
paço do que o disponível na RAM. 

A técnica de paginação gráfica per- 
mite o acesso a cada tela na memória do 
computador. Dependendo do espaço 
disponível, pode-se definir previamen- 
te uma sequência de oito ou mais telas, 





LIMITAÇÕES DA MEMÓRIA 
TÉCNICAS DE PAGINAÇÃO 
PÁGINAS GRÁFICAS E 

A EXIGÊNCIA DE ESPAÇO 
ANIMAÇÕES GRÁFICAS 


Para $gonomizar espaço, lance mão de 
alguris pequenos truques. Por exemplo: 
em uma sequência como a da página 
| 144, que mostra uma figura (o “ho- 
mem-rabisco"), as páginas gráficas se- 
riam exibidas na ordem 1,2,3,4,5,1, 
2, 3, 4, 5 e assim por diante. Porém, co- 
mo você deve ter observado, existem 
dois pares muito semelhantes: o par 2 
e4eopar3esS. Ora, em uma situação 
onde qualquer espacinho está a prêmio, 
será bem melhor armazenar apenas uma 
figura de cada um desses pares. Duran- 
te a projeção das imagens, nem se no- 
tará a diferença e você terá economiza- 
do um bom espaço. Usando a seguên- 
cia 1,2,3,2,3, 1, você continuará com 
uma animação de cinco imagens, arma- 
zenando apenas três telas. 


O Spectrum de 48 K pode manipular, 
no máximo, oito ou nove páginas grá- 
ficas diferentes, com apenas duas cores 











OE 


(INK c PAPER). Esse micro também 
apresenta uma limitação que envolve o 
tamanho da tela, Se utilizarmos dois ter- 
ços dela, cada página gráfica ocupará 4 
K. Somando mais 2 K, exigidos pelo 
programa, chegamos logo ao limite má- 
ximo de memória. Levando em conta es- 
sas limitações, O programa que se segue 
trabalha com oito telas, mostrando uma 
estrada em perspectiva. 


10 BORDER O: 
o RS 

20 CLEAR 27999 

30 GOSUB 170 

40 LET srce=64: LET dest=110 
S0 FOR n=1 TO 20: PLOT RND*( 
255), RND* (40) +130: NEXT n 

60 FOR n=0 TO 7 
70 FOR m=4 TO 21: 
OD” 


o O: INK 7: 


PRINT AT m, 


E | 

BO GOSUB 2Z60 
90 GOSUB 22720: 

16 
100 NEXT n 
110 LET arce=lioO: 
120 FOR n=0 TO / 
130 GÓSUB 220: LET grce-srcef 
16 | 
140 PAUSE 4 a 
150 NEXT n 
160 GoToO 110 
170 DATA 1,0,16,17,0,0,33,0,0, 
237,17/6, 201 
180 FOR 1=28000 TO 28000+11] + 
190 READ byte: POKE s,byLe 
200 NEXT 1 
210 RETURN 
220 POKE 28005, dest 
210 POKE 28008, 9rce 
240 BAND USR 28000 
2580 RETUAHN 
260 PLOT 0,120: 
270 PLOT 118,120: 
BO: PLOT 138,120: DBAW 117,-50 
280 FOR 39=1 TO 3: READ x,y,a,b 
 PLOT x,y: DRAW a,b: NEXT 3 
290 READ x,v,a,b,c,d 
300 PLOT x,y: DRAW a,b: DRAW c 
| 
310 RETURN 
320 DATA 128,120,1,-1,140,105, 
3.-3,138,120,0,2,118,140,10,-5 
,110,5,130,118, 14,20 160, 80,6, -6 
,143,118,0,7,118, 138,10,-3,10, 


LET dest=dest+ 


LET dest=64 


DRAW 255,0 
DRAW -118,- 


3 
330 DATA 133,114,1,-1 (198,30,8 
-8,160,112,0,15,118, 136, 10,-1 
ETA Ve 140, 105, 4,- 4,128,120,1, 
1,184,105,0, 30,118,13: | ae 
=3, 160, 80, 6,-6, 130, 
340 DATA 220, do ara 
ESA Cas 
De prados 
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10,1,10,-1,198,30,8,-8,133,114 
,1,-1,118,120,0,4,118,136,10,- 
1,10,4 

350 DATA 128,120,1,-1,140,105, 
4,-4,80,100,0,30,118,138,10,- 

,/10,3,130,118,1,-1,160,80,6,-6 
,5,55,0,100,118,139,10,-4,10,4 


O programa começa inicializando a 
tela em preto é branco e definindo o 
RAMTOP em 27999. A rotina das li- 
nhas 170, 180, 190, 200 e 210 £oloca 





























uma pequena rotina em linguagem de 
máquina acima da RAM acessível. Es- 
sa rotina, muito rápida, será a respon- 
sável pela transferência do bloco de in- 
formações da tela para a memória, à 
medida que as imagens vão sendo cons- 
truídas e, posteriormente, irá também 
recuperá-las, trazendo-as de volta à te- 
la. A linha 40 estabelece os valores dos 
bytes mais significativos das variáveis 
sree e dest, que contêm, respectivamen- 
te, O endereço da área a ser transferida 
e o do seu destino. 

A primeira parte da rotina dos gráfi- 
cos, que começa na linha 50, simples- 


mente faz desenhos em posições aleató- 
rias da tela. Esses desenhos são fixos e 


apesar de aparecerem em toda fo 
nas, não E Peitos, a aa | 


potes o 


da estrada (linha 270), a própria estra- 
da e os postes (linha 280) e uma ave em 
vôo (linha 290) — sempre lendo as in- 
formações que estão nas linhas DATA 
ao final do programa (linha 320 em 
diante). 

Retornando da rotina de desenho, o 
programa é desviado para uma sub- 
rotina de POKE, na linha 220. Esta co- 
pia os 4 K de cada tela em um local 
apropriado da memória. O endereço 
dest é incrementado com o valor 16 no 
seu byte mais significativo (16*255 = 4 
K), a fim-de criar o espaço para a pró- 
xima página gráfica. O programa vol- 
ta, mais uma vez, para a rotina de dese- 
nho e todo o processo se repete oito ve- 
zes, sendo que, a cada vez, a figura é fei- 
ta uma posição adiante, 

Em seguida, o programa chama as oi- 
to telas, sucessivamente, dando o efei- 





to de animação. Para isso, o endereço 
dest torna-se o novo srce, a partir do 
qual a rotina da linha 220 à 250 chama 


cada página gráfica 
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10 PCLEAR 4: PMODE 3:CLEAR 40,92 


20 SCREEN 1,0:FOR K=0 TO 4:PCLS 
30 CIRCLE(127,120),20,4,1,.17,. 
55:LINE(110,116)-(127,120),PSET 
-LINE-(132,136), PSET:PAINT(122, 
135),2,4 

40 DRAW"BM137,136SBF6DIOL9UISL4 
DI9RIZUI4EZNE6LB”:PAINT(150,150 
),3,4:DRAW"C3IBRR4C4” 

50 DRAW" BM110,116S16L14U10R21D3 
RUSL24DI S”:PAINT(90,120),3,4 
60 déyta  M L=0 TO 5-K:LINE( 
148-L,146-L)-(156+L,146-L), PSET 
“NEXT 

70 DRAW"BMI41,"+STRS (B6+K)+"C3S 
4F2G2H3E2D4" :DRAW"BMI41,"+STRS( 
INT (88+1.5*K*K))+"D2F2DL4VE2D4" 
80 DRAW"BM"+STRS (INT(141+1.8*K) 
J+", "+STRS (127+5*K)+"H3E3F2G2DU 
462" 

90 COLOR 2:FOR L=0 TO S:LINE(II 
0-L*10-K*2,117)-(110-L*10-K*2,1 
23), PSET:NEXT 

100 FOR L=0 TO 7:LINE(54+L*10+K 
*2,75)-(54+L*10+K*2,69), PSETENE 


XT 

110 FOR L=0 TO 3:LINE(48,115-L* 
10-K*2)-(52,116-L*10-K*2), PRESE 

T:NEXT 

120 IF K=0 THEN DRAW"BM110,124€ 
3H2UEZF2DG2U4" 

130 COLOR 4:FOR L=0 TO 2:A=ATN( 
1)*(L*60-K*12) /45:LINE(127-18*S 
IN(A),120-18*COS(A))-(127+18B*SI 

N(A),120+18*COS(A)), PSET:NEXT 
140 A=ATN(1)*(B+K*12)/45:DRAW"B 

M”+STRS (INT(127-18*SIN(A)))+"," 

+STRS (INT(120+18*COS(A)))+"C3E2 

UVHZG2DF2U6C4” 

150 FOR L=2 TO 4:PCOPY L TO 4+K 
*3+L:NEXT L,K 

160 FOR L=1 TO 5:FOR K=2 TO 4:P 

COPY K+L*3+1 TO K:NEXT K,L:GOTO 
160 





O programa começa reservando qua- 
tro blocos (1,5 K cada) para as informa- 
ções da tela, pois, como selecionamos 
a modalidade PMODE 3, cada tela re- 
quisitará 6 K de memória. 

Até agora utilizamos 6 k. Como o 
BASIC e a tela de teste ocuparão mais 
1,5 K, ficaremos com 25 K de memória 
RAM aproveitáveis. Usando páginas in- 
teiras que requerem 6 K cada uma, po- 


deriamos contar com mais de quatro te-s 


las de páginas gráficas (25 K divididos 
pop 6) — mas isto deixaria muito pou- 
co espaço para o programa, 

Se limitássemos o desenho a três 
quartos da tela, cada página iria ocupar 
apenas 4,5 K de memória. Utilizaria- 
mos, assim, cinco páginas, deixando li- 
vres 2 K para o programa. Não haveria, 
entretanto, espaço” para o sistema de 
operação de disco. 

Depois de estabelecer PMODE 3 — 
quatro cores com uma resolução de 128 
por 192 pontos —, a primeira linha do 
programa limpa a parte menos impor- 
tante de armazenamento de strings aci- 
ma do endereço 9215, Para suds pró- 
prias rotinas, você deverá definir essa 
parte por tentativa é erro, 

A segunda linha continua com o pro- 
cesso de inicialização, definindo o mo- 
do de resolução da tela e a cor. Aqui se 
inicia também o laço de desenho, cujo 
primeiro comando é um PCLsS. 
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A rotina de desenho que se segue ocu- 
pa grande parte do programa. A linha 
30 constrói e pinta o corpo da bomba 
de movimento continuo, que forma a 
base da figura. A linha 40 monta o fu- 
nile o preenche com cor, enquanto a h- 
nha 50 faz o mesmo com o cano. As li- 
nhas 60, 70 e 80 encarregam-se da que- 
da da água. As linhas 90, 100 e HO de- 
senham as listas que ajudam a dar a im- 
pressão de que a água está em movimen- 
to. Outros detalhes da bomba — como 
a rotação da pá — são executados pelas 
linhas 120, 130 e 140. 

A linha 150 copia os três quartos da 
tela na memória — mais precisamente 
na área definida pela linha 10 — e o pro- 
grama volta para a rotina de desenho, 
para que sejam montadas as outras pa- 
ginas gráficas. Cada uma delas é guar- 
dada na memória quando o programa 
alcança, novamente, a linha 150, 

Depois que todas as páginas estive- 
rem armazenadas, o programa entra na 
rotina de animação (linha 160). Esta 
chama todas as telas, em sequência, até 
o programa ser waterrompido, 


Quando usamos um comando gráfi- 
co do tipo LINE, por exemplo, o com- 
putador “rabisca”” o traço pedido sobre 
a tabela de padrões da VRAM. Portan- 
to, se fizermos uma cópia dessa tabela 
na RAM, podemos transferi-la poste- 
riormente para a VRAM e o desenho se- 
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Entre as cinco figuras, existem dois 


pares muito semelhantes: o par 2 e d 
copar Jes5. Podemos, sem maiores 
prejuízos, armazenar só três figuras 
e repetir duas delas uma de cada 


rá imediatamente refeito. Poderiamos 
também armazenar a tabela de cores, 
mas isso acrescentaria 6144 bytes aos 
6144 bytes da tabela de padrões, o que 
nos limitaria ao uso de, no máximo, 
uma página gráfica. Para que nossa te- 
la não fique sem cor, carregaremos a ta- 
bela de cor com um número específico 
que definirá as cores de fundo e de fren- 
te. Nosso desenho (um beija-flor) terá, 
portanto, apenas duas cores. Em com- 
pensação, economizamos o suficiente 
para três páginas gráficas. 

Para transferir os dados da VRAM 
para a RAM, recorreremos a uma roti- 
na da ROM chamada LDIRMY. Para 
fazer o contrário, usaremos uma outra 
rotina, a LDIRVM. Finalmente, para 
carregar a tabela de cores com um byte es- 
pecífico, utilizaremos a rotina FILVRM, 
que preenche qualquer área da VRAM 
com um determinado valor. O acesso a 
essas rotinas requer a introdução de al- 
guns valores nos registradores da máqui- 
na. Por isso, construiremos uma peque- 
na rotina em linguagem de máquina pa- 
ra chamar cada rotina da ROM. 


CLS 
CLEAR200,40960! 
DEFUSR=40960! 
DEFUSR1=40973! 
DEFUSR2=40986! 
FOR R=0 TO 37 
READ A 

POKE (40960!+0),A 


par — na sequência. Obteremos, 

desse modo, uma animação de cinco 
imagens utilizando apenas três telas. 
Este é um dos vários recursos 
empregados para economizar memória. 





90 NEXT 

100 SCREENZ 

110 X1=112:Y71=67:N=16 

120 GOSUB 430 

130 A=USR(U) 

140 SCREENZ 

150 X1=115:Y1=83:N=19 

160 GOSUB 430 

170 POKE 409641,0 

180 POKE 409651,185 

190 A=USR(U) 

200 SCREEN 2 

210 X1=158:Y1=182:N=1/ 

220 GOSUB 430 

230 POKE 409641,0 

240 POKE 409651,209 

250 A=USR (0) 

260 POKE 40990! ,1*416+11] 

270 A=USR2 (0) 

280 FOR I=1l TO 3:0N 1 GOSUB 310 
1350, 390:NEXT 

290 FOR I=3 TO À STEP 
OSUB 310,350, 3490: NEXT 


-“1:0N I G 


300 GOTO 280 

310 POKE 409741,0 
320 POKE 40975!,161 
330 A=USRI (0) 


RETURN 

POKE 409/41,0 
POKE 409751!,185 
A=USRI (0) 

RE TURN 

POKE 409/41!,0 
POKE 409/51,7209 
A=USRI (0) 
RETUAN 

FOR I=1 TON 
READ X2 


340 
350 
360 
370 
380 
390 
400 
410 
420 
430 
440 


450 READ YZ 

460 LINE(X1,Y1)-(X2,Y2) 

470 LET X1I=X2:LET Yl=Y2 

480 NEXT I 

490 RETURN 

500 DATA 33,00,00,17,00,161,01, 


00,24,205,89,00,201 

510 DATA 33,00,161,17,00,00,014, 
00,24,205,92,00,204 

520 DATA 33,00,32,62,00,01,00,2 
d,205,86,00,201 

530 DATA 86,3,79,67,90,86,192,3 
/176,64,141,99,198,166,170,186 
540 DATA 115,186,118,138,86,118 
/12,191,48,139,51,109,67,90,90, 
B6 

550 DATA 96,64,54,48,63,86, 415, 
B3,160,80,240,102,185.,115 

560 DATA 144,113,160,144,1942,14 
7 ,179,169,144,185,115,148B 

570 DATA 86,118,12,191,48,139,5 
1,109,67,90,83,86 

580 DATA 18B2,1]60,224,121,166,12 
8,105,83,90,128,160,191 

590 DATA 150,116,105,83,67,90,5 
1,109,48,139,10,190 

600 DATA B9,118,90,128,87/, 
3,176,70,134 


137,8 


A linha 20 reserva uma área da me- 
mória para as rotinas em linguagem de 
máquina. A linha 30 define o início da 
rotina que irá chamar a LDIRMY e a 
linha 40, o início da rotina que acessa 
a LDIRVM. A linha 50 faz o mesmo pa- 
ra a rotina FILVRM. 

O laço entre as linhas 60 e 90 lé as li- 
nhas DATA 500, 510 e 520, que contêm 
as rotinas — na ordem em que foram 
citadas —, colocando-as na memória do 
microcomputador. 

A rotina de desenho localiza-se entre 
as linhas 100 e 270. A cada página, o 
computador inicializa as variáveis X1, 
Y1 e N, que guardam as coordenadas 
iniciais do desenho e o número de pon- 
tos a serem lidos. O programa é então 
desviado para a sub-rotina entre as li- 
nhas 430 e 490, que lê as informações 
contidas nas linhas 530 a 600 e traça as 
retas. Assim que a figura estiver com- 
pleta, a rotina que armazena a tela na 
RAM é chamada, 

O processo é o mesmo para as outras 
duas páginas, com uma diferença: dois 
comandos POKE irão alterar a sub-ro- 
tima de armazenamento. Esta continha, 
inicialmente, o endereço a partir do qual 
a primeira tela seria guardada na RAM, 
E claro que não podemos usar esse mes- 
mo endereço para as duas outras pági- 
nas gráficas. O papel dos comandos PO- 
KE é, portanto, fazer a modificação ne- 
cessária para O início da segunda e da 
terceira páginas. 

Depois que todas as telas já tiverem 
sido armazenadas, a linha 260 determi- 
na o valor do byte que preenchera a ta- 








bela de cores, colocando-o na rotina que 
acessa a FILVRM. O valor 1 é a cor de 
frente — preto — e o valor ll é a cor 
de fundo — amarela. A linha 270 cha- 
ma essa rotina. 

Em seguida chega-se à rotina encar- 
regada de alternar as telas. Os dois la- 
ços (linhas 280 e 290) determinam uma 
sequência de telas do tipo 1, 1,2,3,3, 
2, 1, 1, fazendo com que um beija-flor 
em vôo permaneça mais tempo com as 
asas para cima e para baixo do que na 
posição intermediária. 

Conforme o valor da variável I, o 
programa é desviado para uma sub-ro- 
tina. Nesta, um par de comandos PO- 
KE modifica a rotina que busca os da- 
dos na RAM, Esses comandos definem 
os endereços a partir dos quais a memó- 
ria será transferida para a tela. 

Se você quiser construir suas próprias 
animações, elimine a sub-rotina da linha 
430, assim como todas as linhas que a 
chamam. Além disso, apague também 
a linha DATA 530 e as que a seguem e 
coloque seus comandos gráficos a par- 
tir da linha que inicializava as variáveis, 
tendo o máximo cuidado para não pro- 
vocar sobreposições. 

Como você deve saber, os micros da 
linha Apple oferecem ao usuário duas 
páginas gráficas prontas para serem uti- 
lizadas. Por meio dos comandos usuais 
do BASIC, não podemos escrever em 
uma das páginas sem que ela apareça no 
vídeo. Se isto fosse possível, eliminaria- 
mos, em uma animação, aquele efeito 
desagradável provocado pelos coman- 
dos HGR e HGR2 para limpar a tela — 
enquanto mostrássemos uma tela, esta- 
riamos simultaneamente limpando e es- 
crevendo na outra. Em seguida, basta- 
ria trocar as duas e repetir o processo 
até o fim da animação. Teriamos, assim, 
uma velocidade moderada, mas não ha- 
veria um limite de páginas gráficas. 

O próximo programa ilustra o desen- 
volvimento desse processo com a anima- 
ção de uma figura — o homem-rabisco 
— | comentada anteriormente. 


10 POKE - 16304,0:X = 200 

20  HGR HGR2 HCOLOR= 3 

30 POKE 230,32: GOSUB 240 

40 POKE - 16300,0 

50 POKE 230,64: GOSUB 280 

60 POKE - 16299,0 

70 POKE 230,32: HCOLOR= O: GOS 
UB 240: HCOLOR= 3: GOSUB 320 

BO POKE - 16300,0 

90 Pl = 32:P2 = 64:Ml = - 1630 
0:M2 = - 16299 

100 POKE 230,P2: HCOLOR= O: GO 
SUB 2B0:X = X - 15: HCOLOR= 3: 


| | 
| | 





A estrada sem fim no Spectrum. 


GOSUR 280 
110 IF X < 30 THEN STOP 

120 POKE M2,0 

130 POKE 230,Pl:X = X + 15: HC 

OLOR= 0: GOSUB 320:X = X - 15: 
HCOLOR= 3: GOSUB 320 

140 POKE M1,0 

150 POKE 230,P2: HCOLOR= 0: GO 
SUB 280: HCOLOR= 3: GOSUB 240 
160 POKE M2,0 

170 POKE 230,Pl: HCOLOR= 0: GO 
SUB 320: HCOLOR= 3: GOSUB 280 
180 POKE M1,0 

190 POKE 230,P2: HCOLOR= O: GO 
SUB 240: HCOLOR= 3: GOSUB 320 
200 POKE M2,0 

210 TR = Pl:Pl = P2:P2 = TR 

220 TR = MI:MI = M2:M2 = TR 

230 GOTO 100 

240 HPLOT X - 16,136 TO X - 9, 
133 TO X,94 TO X + 8,136 TO X,] 
36 

250 HPLOT X,94 TO X - 3,58 TO 

X - 9,50 TO X,48 TO X - 3,58 
260 HPLOT X - 10,97 TO X - 4,8 
2 TO X- 3,58 TO X + 9,98 

270 RETURN 

280 HPLOT X - 15,136 TO X - 1] 
132 TO X - 10,114 TO X - 1,97 

TO X + 7,136 TO X,136 

290 HPLOT X - 1,97 TO X - 7,61 
TO X - 13,50 TO X - 4,48 TO X 
- 7,61 

300 HPLOT X - 12,97 TO X - 6,8 
5 TO X- 7,61] TO X + 1,82 TO X 

+ 2,97 

310 RETURN 

320 HPLOT X - 15,136 TO X - 8, 
136 TO X - 5,114 TO X - 1,94 TO 
x - S,1]4 TO X + 3,132 TO X - 

3,136 

330 HPLOT X - 1,94 TO X - 35,61 
TO X - 12,50 TO X - 3,48 TO X 
- 5,61 

340 HPLOT X - 7,98 TO X - 3,6] 
TO X + 5,78 TO X - 8,90 

350 RETURN 


ANIMAÇÃO GRÁFICA 


As instruções para as telas de núme- 
ros 1, 2 e 3 se encontram, respectiva- 
mente, a partir das linhas 240, 280 e 320. 
Elas serão chamadas na ordem 1, 2, 3, 


TRS-Color: bomba moto-contínua. 


2, 3, 1. Se quisermos mostrar um dese- 
nho na página 2, por exemplo, teremos 
que executar as etapas do processo des- 
crito em seguida, enquanto a página 1 
está na tela: 


- habilitar a escrita na página 2 
apagar a página 2 

escrever na página 2 

mostrar a página 2 na tela 


] 


Para habilitar a escrita em uma pá- 
gina, é necessário colocar um determi- 
nado veilor no endereço 230 por meio de 
um comando POKE. Se esse valor for 
32, qualquer comando gráfico será exe- 
cutado na página 1; se for 64, será aces- 
sada a página 2. 

Para apagar uma página gráfica, te- 
mos simplesmente de descolorir a figu- 
ra, utilizando a mesma rotina que a 
montou, com HCOLOR = 0. 

Empregamos também o comando 
POKE para colocar uma página na te- 
la. Se esse comando for dado no ende- 
TEÇO 4 00, será mostrada a página 1; 
se for no endereço — 16299, será 
mostrada a página 2. Em ambos os ca- 
sos, porém, deve haver um comando 
POKE no endereço — 16304; caso con- 
trário, será mostrada a página de texto. 

A fase de inicialização localiza-se en- 
tre as linhas 10 e 90, onde ocorrem as 
primeiras impressões. A variável X con- 
trola a posição horizontal da figura na 
tela e será incrementada com o valor 15 
a cada passo. 

Entre as linhas 100 e 230 situa-se o 
laço que irá controlar o movimento do 
homem-rabisco até o fim da animação. 
Na linha 100 e na linha 130, subtrai-se 
15 dessa variável para que seja apagada 
a imagem que foi feita antes do in- 
cremento. 

As linhas 210 e 220 promovem a tro- 
ca de valores entre as variáveis Pl, P2, 
M1 e M2. Estas definem as páginas em 
que serão feitos os desenhos e as pági- 
nas que serão mostradas. A troca é ne- 
cessária para que não se perca a alter- 
nância de telas. 
















NOR 


- Willie já sofreu bastante: foi atingi- 
do por pedras, caiu em buracos, levou 
picadas de cobras venenosas e se afogou 
no mar. Precisamos oferecer-lhe uma 
oportunidade de se defender. Nos pró- 
ximos três artigos da série Avalanche, 
veremos como fazer Willie andar, cor- 
rer ou saltar, dando-lhe chance de evi- 
tar a morte prematura. 


O programa a seguir permite que 
Willie inicie a escalada da montanha e 
verifica se ele encontrou algum perigo 
ou prêmio peto caminho. 

Caso você não esteja usando o mon- 





AVALANCHE: 
A ESCALADA 















tador Assembler de INPUT, lembre-se 
de que o número 254, na instrução im 
a,254, está entre parênteses. 


10 REM org 59153 

20 REM man id a, (57335) 
30 REM cp O 

40 REM jp, nz, mp 
50 REM ld a, (57334) 
REM cp 1 

REM jr z, mma 

REM ld h1,(57332) 
REM dec hl 

REM 1d bc,1638B4 
REM ld a,45 

REM ld de,5lá 
REM call 58970 
REM ld bc,57000 
REM ld a,40 





Até agora, nosso personagem 
permaneceu indefeso diante dós perigos 
que o cercam. Vamos dar-lhe a chance 
de escapar, fazendo com que escale 

a montanha, corra e salte. 


170 
180 
190 
200 
210 
220 
230 
240 
250 
260 
270 
280 


REM 


REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 





+ rar 


"peo se Us 





ld de,258 
call 58970 


ld de,22592 
add hl,de 


ld 
cp 
JP 
cp 
Jr 


cp 


Jr 
lá 

















a, (hl) 
45 
z,.mby 
43 
Z.mby 
15 
Z.mby 
a,0 


| 





o O O 


290 
300 
310 
320 
330 
340 
350 
360 
370 
380 
390 
400 




















REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 
REM 


REM 








in a,254 
bit 2,a 

3c nz,mft 
Ló b,l 

bit 3,a 

3r nc,mlj3 
ld b,129 
mlj ld a,b 
ld (57335),a 
3r mct 

mft bit 3,a 
jr nz,mct 






























































































































































































































E ANIMAÇÃO DO PERSONAGEM 


ie e É SS 


E | OMOMENTODESALTAR 
E INÍCIO DA CAMINHADA 
E “ONDE WILLIE 

ESTÁ PISANDO? 


410 REM ld a,l 

420 REM 1d(57334),a 
430 REM mct ld h1l, (57332) 
440 REM ld de,191 
450 REM esbc hl,de 
460 REM yr nc,mor 
470 REM ld a,l 

480 REM ld (57336),a 
490 REM mor ret 

500 REM mma ld de,3 
510 REM ld h1,1548 
520 REM call 949 

530 REM ld h1,(57332) 
540 REM ld de,22561 
550 REM add hl,de 
560 REM ld a, (hl) 
570 REM cp 43 

580 REM j9r z,mby 

590 REM cp 44 

600 REM j3r z,;mts 

610 REM cp 42 

620 REM 3r z,mby 

630 REM ld de,32 

640 REM add hl,de 
650 REM ld a, (h1) 
660 REM cp 15 

670 REM jr z,mby 

680 REM cp 45 

690 REM 3r z.mby 

700 REM cp 43 

710 REM 3r z.mby 

720 REM ld h1, (57332) 
730 REM ld a,40 

740 REM ld bc,57016 
750 REM ld de,5l4 
760 REM call 58970 
770 REM inc hl 


780 REM ld (57332),hl 
790 REM mts ld a,0 
800 REM ld (5/394),a 


B1lO REM ret 

820 REM mby ld a,2 
830 REM ld (57336),a 
840 REM ret 

850 REM jmp ret 


Você pode testar essas linhas mesmo 
que ainda não tenha na memória as ou- 
tras duas rotinas de movimentação de 
Willie. Uma instrução ret, que será apa- 
gada mais tarde, foi colocada no fim da 
rotina que acabamos de listar. Em con- 
sequência, se você chamar uma rotina 
inexistente, o programa apenas retorna 
e nenhum erro ocorre. 





QUAL É O MOVIMENTO? 


A variável na posição de memória 
57335 informa se Willie irá ou não pu- 


DOS PRÊMIOS 
To MOBILIDADE 
TOO PASSOSFATAIS 
"E O ÚLTIMO SUSPIRO 


lar. O conteúdo desta posição é carre- 
gado no acumulador e comparado com 
0. Se não for igual a O, Willie irá pular. 
O processador salta, então, para a roti- 
na jmp, que ainda não foi publicada. 
Como, em seu lugar, encontra apenas 
uma instrução ret, volta para o local on- 
de a rotina foi chamada. 

Se Willie não vai pular (o conteúdo 
de 57335 é 0), o processador continua 
a execução da rotina. O conteúdo da po- 
sição de memória 57334 é carregado no 
acumulador. Essa posição contém a cha- 
mada variável da caminhada. 

Existem duas figuras para Willie — 
numa delas, ele está com as pernas jun- 
tas e, na outra, com as pernas abertas. 
Enquanto nosso personagem não se lo- 
comove, a primeira figura é impressa 
continuamente no mesmo lugar. Mas, 
quando ele está andando, as duas figu- 
ras são impressas alternadamente. A va- 
riável da caminhada informa ao proces- 
sador se Willie deve andar uma posição 
— nesse caso, a figura adequada é a que 
tem as pernas abertas. 

A instrução cp 1 verifica qual figura 
será impressa. Se for a de valor | — que 
tem as pernas abertas —, a instrução jr 
z,) mma manda o processador para a ro- 
tina que faz Willie andar e imprime es- 
sa figura. Se for a de valor O — que tem 
as pernas fechadas —, o processador 
continua. 





O HOMEM INVISÍVEL 


Ao andar, Willie abre as pernas e se 
desloca uma posição à frente, onde apa- 
rece com as pernas juntas. Portanto, o 
algoritmo que produz esse efeito impri- 
me, em segiiência, as figuras 0, 1 e 0. 

Como a figura que tem as pernas 
abertas ocupa duas posições adjacentes 
e a que tem as pernas fechadas, só uma, 
obtém-se um movimento bem suave. 

Para imprimir a figura 0, é preciso 
apagar a figura anterior — do contrá- 
rio, teremos várias partes de Willie pela 
tela. A instrução ld hi, (57332) carrega 
a posição de Willie — armazenada nos 
endereços 57332 e 57333 — no par HL. 
Esse valor é decrementado para voltar 
uma posição. 

O par BC é então carregado com 








N | | | 
| ] | 


16384. Este é o endereço do topo da te- 
la, onde se encontra o padrão de céu. 
A é carregado com 45 e DE, com 514. 
A rotina de impressão de blocos em 


58970 é chamada em seguida. Como vo-- 


cê deve se lembrar, o par HL, nessa ro»- 
tina, contém a posição na tela, eo par 
BC, o apontador de dados. A, por sua 
vez, especifica a cor — 45 é ciano sobre 
ciano — e o par DE fixa o tamanho do 
bloco. O número 514 fornece um bloco 
de dois por dois caracteres. D contém 


o número de linhas e E, o número de co-. 


lunas — 2 x 256 + 2 = Slá. 

Assim, quando é chamada, essa ro- 
tina imprime um bloco dois por dois de 
céu na posição imediatamente anterior 
aquela onde você irá imprimir Willie de 
novo. Em outras palavras, ela apaga O 
velho Willie que, com suas pernas aber- 
tas, ocupa quatro caracteres. 


IMOBILIDADE 





Agora precisamos imprimir o novo 


Willie com as pernas juntas. Os dados | 


para isso começam em 57000. Logo, o 
par BC é carregado com 57000. O acu- 
mulador A é carregado com 40, código 
de azul sobre fundo ciano, a cor de 
Wille. 

O par HL, anteriormente decremen- 
tado, volta a ser incrementado para 
apontar a posição do personagem. O par 
DE é carregado com 258 — dando um 
bloco de um por dois (| x 256 + 2 = 
258), o espaço que Willie ocupa com as 
pernas juntas. A rotina de impressão de 
blocos é chamada para imprimir Willie. 





ONDE WILLIE ESTÁ PISANDO? 


Como nosso personagem se moveu 
uma posição à frente, convém verificar 
onde ele está pisando. Se for numa co- 
bra, num buraco ou na água, o proces- 
sador deve ser informado de sua morte. 

Em primeiro lugar, verifique a cor do 
caractere que está sob os pés de Willie. 
O arquivo de cores começa em 22528. 
O valor contido em HL corresponde à 
posição da tela ocupada pela cabeça de 
Willie. Mas, como você quer a cor do 
caractere que está sob seus pés, precisa- 
rá adicionar o valor 64. 

Por isso, 22592 é carregado no par de 
registros DE e somado ao par HL. O re- 
sultado da instrução add hl,de é sempre 
colocado em HL. O conteúdo da posi- 
ção da memória que HL aponta no mo- 
mento é colocado em A. O acumulador 
passa a conter a cor do caractere que es- 
tá sob os pés de Willie. 

Esse valor é comparado com 45 — 
ciano sobre ciano, a cor do céu que 


preenche os buracos. Se for 45, a ins- 
trução jr z;mdy manda o processador 
para uma rotina curta que faz Willie 


“morrer. Se não há um buraco debaixo 


de Willie, o conteúdo do acumulador é 
comparado com 43 — magenta sobre 
ciano; a cor da cobra — e com 15 — 
branto sobre azul, a cor do mar. Se 


* qualquer um desses valores estiver pre- 


sente, O processador salta para a rotina 
mdy € elimina Willie. Caso contrário, o 
processador continua a execução da ro- 
tina — Willie está salvo. 


HORA DE PULAR 


Nesta parte da rotina, a ação se en- 
cerra, efetivamente, com a impressão de 
Willie com as pernas juntas, uma posi- 
ção à frente. Se ele não morreu, o pas- 
so seguinte consiste em verificar quan- 
do ele irá se mover de novo. Para isso, 
empregamos o comando in. 

Antes, porém, A é carregado com O 
— o que significa que o teclado inteiro 
será analisado e que qualquer conjunto 


“de teclas poderá ser utilizado-para.con- 
'trolar og movimentos de Willie. Embo- 


ra na página de instruções M e N te- 
nham sido especificadas, outras combi- 
nações — tais como Je K ou Ue Il — 
são apropriadas para fazer nosso perso- 
nagem pular e andar, 


O comando in é usado para efetuar 


uma busca na porta 254. A instrução bit 
2,a analisa o bit dois do número encon- 
trado para verificar se a tecla M — ou 
Jou U — foi pressionada. Todos os bits 
equivalentes às teclas têm normalmente 
o valor 1, mas assumem o valor O quan- 
do a tecla é pressionada. Assim, se M 
foi pressionada, o bit dois tem valor O 
e o processador ignora a instrução jr nz. 
Caso contrário, ele salta para a rotina 
mit. 

Se a tecla foi pressionada e Willie de- 
ve pular, B é carregado com 1. Em se- 
guida, o bit três é testado do mesmo mo- 
do. Se N não foi pressionada e o bit três 
tem valor 1, a instrução jr nz faz o pro- 
cessador saltar a próxima instrução. 
Mas, se a tecla foi pressionada, a ins- 
trução jr nz não tem efeito e B é carre- 
gado com 129. 

O significado dos números 1 e 129, 
que utilizamos para carregar B, será ex- 
plicado quando apresentarmos as seções 
do programa que executam o salto ver- 
tical e o salto à frente. 

O processador transfere o conteúdo 
de B para A e o carrega em 57335. Es- 
te, como você deve se lembrar, corres- 
ponde à posição de memória que o pro- 
cessador irá examinar no início da roti- 
na para ver se Willie pulará ou não. 


“A instrução jr met faz o processador 
saltar a próxima rotina. 


a WILLIE VAI ANDAR? 


Se não houve pressão sobre M, o pro- 
cessador vai para a rotina mft. Ela ve- 
rifica se apenas a tecla N foi pressiona- 
da — ou seja, se Willie, em vez de pu- 
lar, simplesmente irá andar. 

Para ver se a tecla N foi pressiona- 
da, o bit três é testado de novo. Note 
que o valor da porta 254 ainda está no 
acumulador — o processador pulou pa- 
ra este ponto da rotina depois que o bit 
dois foi testado. 

Se N não foi pressionada, jr nz salta 
a rotina seguinte. Caso contrário, Aé 


carregado com 1 e esse valor é armaze-' 


nado no endereço 57334, onde se encon- 
tra a variável da caminhada (que exami- 
namos no início da rotina para saber 
qual das figuras de Willie seria impres» 
sa na tela). Um valor | nessa pósição in- 


dica que Willie deve ser impresso com 
as pernas abertas — em outras palavras, - 


ele está andando. 


PRÉMIOS 





Há apenas mais uma verificação a fa- 


“zer: nosso personagem alcançou algum 


prêmio? 

A posição de Willie é armazenada 
nos endereços 57332 e 57333. O conteú- 
do desses endereços é carregado no par 
HL e o valor 191 — correspondente à 
posição de tela onde o prêmio foi im- 
presso — é colocado em DE. 

O conteúdo desse par de registros é 
subtraído do conteúdo de HL. Se até 
aqui Willie não tiver obtido uma recom- 
pensa, a instrução jr nc segue para a ins- 
trução ret e retorna. Caso contrário, o 
valor 1 é carregado no acumulador e ar- 
mazenado em 57336. Esta é a posição 
de memória que a rotina principal veri- 
fica para saber se o escore deve ser in- 
crementado e se é preciso começar no- 
va tela. Feito isso, o processador encon- 
tra ret e retorna. 





UM PASSO À FRENTE 


O par DE é carregado com o valor 
3 e HL, com 1548. Depois, a rotina 
BEEP, no endereço 949, é chamada exe- 
cutando o efeito sonoro da caminhada. 

Antes de seguir adiante, porém, Wil- 
lie deve ver o que há na sua frente, Sua 
posição é colocada no par HL. Adicio- 
nando 22561 a esse valor, obtemos a cor 
do caractere que se encontra 33 pontos 
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adiante do conteúdo de 57332 e 57333. 
Como este aponta para a cabeça de Wil- 
lie, 33 é um caractere abaixo e à direita, 
indicando a posição imediatamente à 
frente de seus pés. O valor dessa posi- 
ção é carregado no acumulador pela ins- 
trução ld a,(hl). 

A cor do caractere à frente dos pés 
de Willie é comparada com a cor do mar 
— 15, branco sobre azul — da cobra — 
43, magenta sobre ciano — e da pedra 
— 42, vermelho sobre ciano. Se a cor 
do mar, da cobra ou da pedra estiverem 
presentes, a instrução jr z,;mdy faz o 
processador saltar para a rotina que eli- 
mina Willie. Mas, se adiante dos pés de 
Willie estiver o caractere de encosta, O 
processador salta para a rotina que dei- 
xa O personagem parado — é evidente 
que ele não pode ir em frente a não ser 


“pulando. 


Investigar o caractere que está adian- 
teide Willie não é tudo. Devemos veri- 
ficar também em qual caractere ele es- 
tará pisando depois de se mover. Para 


"isso, carrega-se DE com 32, que é adi- 
b cionado aotonteúdo de HL, o que mo- 


vê o apontador 32 caracteres à frente — 


» Ou séja, para à linha de baixo. 


“A cor nessa posição é carregada no 
acumulador pela instrução Id a,(hl) e o 
me pe do acumulador é comparado 
com à cor do mar, a de um espaço va- 
zio e a de uma cobra. Se um desses va- 
lores estiver presente, a instrução jr 
z,mdy vai para a rotina da morte. 

Se nada disso aconteceu e Wille ain- 
da está vivo, HL é carregado com a po- 
sição original do personagem. A é car- 
regado com 40 — a cor de Willie —, BC, 
com 57016 — o endereço inicial dos pa- 
drões para a figura.com as pernas aber- 
tas — e o par DE, com-514 — Willie 
com as pernas abertas ocupando um 
bloco de dois pordoiscaracteres. Em se- 
guida, a rotina de impressão de bloco 
em 58970 é chamada e imprime, ná'tela 
Willie com as pernas abert 


O par HL &incrementado e carrega 
do de volta em 57332 e 57333. Attualis 


zamos, assim, a posição de Willie que, 
na próxima vez, estará um caractere à 
direita. 


AINDA PARADO 





A rotina mts é diretamente chamada 
quando Willie encontra a encosta à sua 
frente e não pode prosseguir a não ser 
pulando. Mas o processador também 
aciona essa rotina quando ele foi im- 
presso com as pernas abertas. 

Um valor O é carregado no acumula- 
dor e no endereço 57334, informando ao 
processador que, na próxima vez, O per- 
sonagem deve ser impresso com as per- 


nas juntas — mesmo que seja no mes- 
mo lugar, se ele não tiver se movido, ou 
uma posição à frente, se foi impresso 
com as pernas abertas e sua posição foi 
incrementada. 

A seguir, O processador retorna. 


O ULTIMO SUSPIRO 


Se Willie se afogou no mar, foi pica- 
do por uma cobra, caiu num buraco ou 
foi atingido por uma pedra, a rotina 
mdy é chamada. Para a divulgação de 
sua morte, coloca-se 2 no endereço 
57336. Em algum ponto do programa, 
esse endereço será checado e o funeral 
de Willie será providenciado. 

Depois disso, o processador retorna 
da rotina. O último ret da listagem, pre- 
cedido do rótulo jmp, será apagado pe- 
la próxima parte de Avalanche. Sua úni- 
ca função consiste em impedir que haja 
erro na falta desta. 


O programa a seguir faz Willie andar 
e verifica se ele se defrontou com algum 
perigo — ou recompensa. 





10 ORG 19902 
20 MAN LDD 18249 
30 ANDB 431 
40 CMPB 430 
50 BNE MANI 
60 LDA 41 
70 STA 18252 
BO MANI LDA 18261 
90 LBNE JUM 
100 LDX 18249 
110 LEAX 544,X 
120 LDX,X 
130 CMPX 455555 
140 LBEQ MDY 
150 CMPX 4SAAAA 
160 LBEQ MDY 
170  CMPX 4S55FF5 
180 LBEQ MDY 
190 “€LRB 
200 » CLR 18264 
210º LDA 4SBF 
220 STA SFFO2 
230 LDA SFF0O0 

| 240 STA 18262 

- 250 LDA 4SDF 

| 260 STA srro2 
270 LDA SFF0OO 
280 STA 18263 
290 CMPA 48EF7 
300 BNEE MANA 
310 LDB 41 
320 LDA 18262 
330 CMPA 45F7 
340 BNE MAND 
350 LDB 4129 
360 MAND STB 18261 
370 LDA 18264 
380  BNE MANC 





390 LDX 18249 
400 PSHS X 

410 BRA MMI 

420 MANA LDA 18262 
430 CMPA 48F7: 
440 BNE MAND 
450 LDA 41 

460 STA 18264 
470 BRA MAND 
480 MANC LDX 18249 
490 LDU 41536 
500 JSR CHARPR 
510 LEAX 254,X 
520 JSR CHARPR 
530 LDX 18249 
540 LEAX 1,X 
550 PSHS X 

560 JLEAX 353,X 
570 LDA ,X 

580 CMPA 4SD5 
590 BEQ MDYA 
600 CMPA 4SFF 
610 BEQ MDYA 
620 CMPA 4550 
630 BEQ MTS 

640 LDA 18251 
650 BEQ MMO 

660 MMI LDX,S 
670 LDU 417774 
680 JSR CHARPR 
690  LDX , 

700 LEAX 256. x 
710 JSR CHARPR 
720 CLR 18251 
730 BRA MANE 
740  MMO LDX ,S 
750 LDU 417814 
760 JSR CHARPR 
770 LDX,S 

780 LEAX 256,X 
790 LDU 417846 
800 JSR CHARPR 
810 LDA 41 

820 STA 18251 
B30 MANE LDX ,S 
840 STX 18249 
850 PULS X 

860 RTS - 

870 |MDYA PULS x. 
880 | MDY LDA 42 
890) STA 18252 
900 RTs 

910 MTS PULS X 

920 LEAX -L,X 

“930. PSHS x 
940 BRA MMI 

950 JUM RTS 
960 CHARPR EQU- 19402 


Essa rotina chama outras qui ainda 
não estão na memória. Para evitar er- 
ros, não tente executá-la antes de ter co- 
locado RTS nos lugares adequados. 


RECOMPENSAS 





A primeira parte da rotina procura 
saber se Willie alcançou suas recompen- 
sas. Para isso, a posição do personagem 
na tela é carregada no registrador D, 
Como existem 32 posições — 32 é 215 





— , precisamos investigar apenas os cin- 
co últimos bits da posição de tela para 
trabalhar com a coordenada X de Wil- 
lie. Se esta coordenada X tiver chegado 
a 30, a coordenada X do prêmio (cuja 
posição Y está fixa junto à encosta), 
Willie deve agarrá-lo. 

A operação AND é feita, então, en- 
tre o conteúdo de Be 31 — Béo regis- 
trador menos significativo do par de re- 
gistradores AB que compõe D. Isso isola 
os cinco bits menos significativos, que 
são comparados ao número 30. 

Se os cinco últimos bits contêm 30, 
“o valor 1 é carregado no acumulador e 
armazenado na variável morte, em 
18252. Assim, o processador é informa- 
do de que deve trazer a próxima tela. 
Caso contrário, a instrução BNE faz o 
processador saltar essas instruções. 





PULO OU PERIGO 


A é carregado com o conteúdo de 
18261, a variável do salto. Se não for 0, 
Willie estará saltando e o processador 
vai para a rotina JUM. Isso é feito com 
um desvio longo porque o rótulo esta 
muito distante. 

A tarefa seguinte é verificar se o per- 
sonagem está diante de algum perigo fa- 
tal — um buraco, uma cobra ou o mar. 
A posição de Willie vai, então, de 18249 
para o registrador X. 

A instrução LEAX 544,X adiciona 
544 à posição de Willie. Como ele tem 
dois caracteres de altura, precisamos 
acrescentar 2 x 256 (512) para apontar 
seus pés. Adicionamos 32 ao resultado, 
obtendo 544, porque há uma linha va- 


zia de pontos entre os pés de Willie e o 
chão. O registrador X é carregado com 
o conteúdo dos dois bytes que estão sob 
os pés de Willie. Esse valor é compara- 
do com $5555, SAAAA e $5FFS. 

$5555 é o código de amarelo, que re- 
presenta o céu — o que indicaria haver 
um buraco sob os pés de Willie; SAAAA 
é azul, a cor do mar, e $5FFS5, verme- 
lho sobre amarelo, a cor da cobra. Se 
uma dessas cores for encontrada sob 
seus pés, Willie está morto e a instrução 
LBEQ faz o processador saltar para à 
rotina MDY, que o elimina. 


AS TECLAS 





A tarefa seguinte consiste em verifi- 
car se alguma tecla foi pressionada. As 
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JUNIENDO O o 48 cómico emanação Do po Ia na 


teclas M e N controlam, respectivamen- 
te, a corrida e o salto de Willie. Portan- 
to, qualquer pressão sobre elas precisa 
ser detectada. 

Primeiro limpa-se o registrador B, 
que será usado para carregar a variável 
que controla o salto de Willie. A posi- 
ção de memória 18264 é ajustada com 
O, já que irá armazenar a variável que 
controla a caminhada de Willie. 

Para saber se uma tecla foi pressio- 
nada, deve-se analisar a matriz do tecla- 
do. No nosso caso, estamos interessa- 
dos particularmente nas teclas M e N. 
A letra M fica na quarta coluna da sex- 
ta linha e a letra N, na quarta coluna da 
sétima linha. 

Para examinar a situação de uma te- 
cla, precisamos escrever o número da li- 
nha em $FFO2; sua situação atual será 
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dada em $FF00. Assim, para verificar 
a tecla N, armazena-se $BF em $FFO2. 
$BF é 10111111 em binário, e é arma- 
zenado porque seleciona a sétima linha. 
O resultado em $FF0O0 é carregado no 
acumulador e armazenado em 18262. 

M é examinada da mesma maneira, 
mas, desta vez, $DF — 11011111 em bi- 
nário — é escrito em $FF02 e o resulta- 
do é armazenado em 18263. A instrução 
CMPA *SF7 compara o resultado com 
$F7 ou 11110111. Lembre-se de que vo- 
cê está tentando ver se uma tecla da 
quarta linha foi pressionada — esta li- 
nha estará em zero. Se $F7 não está pre- 
sente — e Willie não está saltando —, 
a instrução BNE desvia o processador 
para MANA. Mas, se $F7 estiver pre- 
sente, B é carregado com 1 para indicar 
um salto vertical. 

O resultado do exame da linha da te- 
cla N, armazenado em 18262, é então 
carregado no acumulador e comparado 
com $F7. Observe que a tecla N está na 
mesma coluna que a tecla M, embora 
em linha diferente. Se o valor não for 
encontrado, BNE salta a instrução se- 
guinte. Caso contrário, B é carregado 
com 129 para indicar que Wilhe dará um 
salto à frente. Quer seja 1, quer seja 129, 
o valor vai para 18261, 


WILLIE ESTÁ ANDANDO? 


O conteúdo da posição de memória 
18264 é carregado no acumulador. Es- 
ta é a posição que armazena a variável 
que indica se Willie está andando ou 
não. Ela foi limpa, ou seja, ajustada 
com 0, no início do programa. Mas, nes- 
te ponto, não está necessariamente va- 
zia porque a rotina que verifica se Wil- 
lie está andando (que inicia no rótulo 
MANA) salta de volta para MAND. 

Se o conteúdo da posição de memó- 
ria 18264 não for O e Willie estiver an- 
dando, a instrução BNE faz o proces- 
sador saltar para MANC, onde o pro- 
grama começa a fazer Willie se mover. 
Caso contrário, O registrador X é car- 
regado com o conteúdo de 18249 (ende- 
reço que armazena a posição de Wilhe 
na tela) e guardado na pilha. A instru- 
ção BRA MNI faz o processador saltar 
para MNI, que imprime o personagem 
na tela na posição definida pelo último 
valor armazenado na pilha. 

Se M não foi pressionada e Willie não 
está pulando, o processador salta para 
MANA, para ver se ele está andando. 
O resultado do exame da tecla N, arma- 
zenado em 18262, é carregado de volta 
no acumulador e comparado com $F7. 
Se o valor não está presente, a instru- 
ção BNE manda o processador de volta 


para MAND. Como a posição de me- 
mória 18264 ainda está vazia, Wilhe é 
impresso no mesmo lugar. Isso signifi- 
ca que ele está efetivamente parado. 
Mas, se N foi pressionada e Willie de- 
ve andar, | é carregado no acumulador 
e armazenado em 18264. Quando o pro- 
cessador saltar de volta para MAND, o 
personagem começará a andar. 





APAGANDO A FIGURA ANTERIOR 


Quando Willie começa a andar, é 
preciso apagá-lo de sua velha posição na 
tela. Do contrário, partes da figura se- 
rão deixadas pelo caminho. 

X é carregado com a posição do per- 
sonagem em 18249. O apontador de da- 
dos, U, é carregado com 1536, que cor- 
responde ao canto superior esquerdo da 
tela. Assim, quando o processador sal- 
tar para a sub-rotina CHARPR, impri- 
mirá dois caracteres de céu sobre Wil- 
lie, apagando a metade superior da 
figura. 

Para apagar a metade inferior de 
Willie, adiciona-se 254 a X e a rotina 
CHARPR é chamada outra vez. Soma- 
se | à posição da figura, que é carrega- 
da no registrador X — o que faz Willie 
se mover um caractere à frente. O resul- 
tado é armazenado na pilha. 

Depois que Willie anda, precisamos 
verificar onde ele está pisando. A ins- 
trução LEAX 353,X incrementa o apon- 
tador que passa a indicar um byte ime- 
diatamente à frente das pernas do per- 
sonagem, e LDA ,X carrega esse byte no 
acumulador. Ele é então comparado 
com $Ds5, a cor gráfica para a língua da 
cobra, e com $FF, a cor da pedra. Se 
algum desses valores estiver presente, 
Willie está condenado. A instrução BEQ 
manda então o processador para a roti- 
na MDYA, que o elimina. 

Esse byte também é comparado com 
$50, a cor gráfica correspondente à en- 
costa da montanha. Se seu valor estiver 
presente, o processador salta para MÊS, 
que volta a imprimir Willie no mesmo 
lugar, evitando que ele ande. 


O QUE IMPRIMIR cs 


A posição de memória 18251 é usa- 
da como uma baliza para informar ao 
processador qual das duas figuras será 
impressa na próxima vez — a que tem 
as pernas abertas ou a que tem as per- 
nas juntas. Quando elas são impressas 
alternadamente, dão a impressão de que 
Willie está andando. 

A baliza em 18251 é carregada no 
acumulador. Se está ajustada com O, a 
instrução BEQ faz o processador pas- 













sar para a rotina que começa com o ró- 
tulo MNO. Esta imprime a figura com 
as pernas abertas. Mas, se o conteúdo 
de 18251 não for O e a baliza estiver ajus- 
tada com 1, o salto não ocorre e O pro- 
cessador continua na rotina MNI, que 
imprime uma figura com as pernas jun- 
tas. Repare que, se Willie não estiver an- 
dando, o processador também pula pa- 
ra MNI e o imprime com as pernas 
juntas. 

X é carregado com o último valor ar- 
mazenado na pilha da máquina. Reven- 
do a listagem, você constatará que o úl- 
timo dado colocado na pilha de máqui- 
na foi a nova posição de Willie, um ca- 
ractere adiante de sua última posição. 
O apontador da pilha do usuário, U, 
que funciona como apontador de dados 
na rotina CHARPR, é carregado com 
17774. Este é o endereço inicial dos da- 
dos da figura com as pernas juntas. O 
processador vai para a rotina CHARPR 
e imprime a metade superior de Wilhe. 

O registrador X é carregado de novo 
e incrementado com 256, o que faz o 
apontador se mover um caractere para 
baixo — a posição da metade inferior 
de Willie. Observe que não foi preciso 
carregar U de novo. Ele é o apontador 
da pilha do usuário, e se ajusta automa- 
ticamente quando os dados são impres- 
sos na tela. 

A posição de memória 18251 é ajus- 
tada com 0, para que a outra figura de 
Willie — a de pernas juntas — seja im- 
pressa na próxima vez. Em seguida, O 
processador vai para MANE. 

Logo abaixo encontra-se a rotina 
MMO, que imprime a figura seguinte de 
Willie. Ela trabalha exatamente do mes- 
mo modo. Desta vez, porém, U é ajus- 


tado com 17814, já que corresponde ao | 


início dos dados para a figura com as 
pernas abertas. No final da rotina, 1 é 
carregado em A e armazenado em 18251, 
para que Willie seja impresso com as 
pernas juntas na próxima vez que a ro- 
tina de movimentação for chamada. 

Qualquer que seja a figura impressa, 
o processador aciona a rotina MANE. 
Ela carrega a nova posição de nosso per- 
sonagem em X e armazena-a em 18249. 
O último valor da pilha é colocado em 
X, para evitar que a pilha de máquina 
aumente descontroladamente, Q proces- 
sador então retorna. 


MORTE OU IMOBILIDADE 


Se Willie tiver sucumbido a algum 
dos perigos que o ameaçavam é estiver 
morto, o processador é mandado para 
MDYA ou MDY — o rótulo dependerá 
do local onde ele morreu. Se encontrou 
um perigo no início do programa, an- 


tes que a nova posição tivesse sido co- 
locada na pilha, o processador irá para 
MDY. Mas, se a nova posição de Willie 
já foi colocada na pilha antes do passo 
fatal, ele irá para MDYA, e a nova po- 
sição será recuperada da pilha. 

A é carregado com 2 — valor que in- 
dica a morte de Willie. Em seguida, es- 
se valor é armazenado em 18252, posi- 
ção da variável da morte. 

Feito isso, o processador retorna. 

Se Willie tiver esbarrado na encosta, 
o processador é mandado para MTS. 
Aqui, a nova posição de Willie é nova- 
mente recuperada da pilha, mas seu va- 
lor é utilizado e, depois de decrementa- 
do em 1, volta à pilha. 

O processador salta mais uma vez pa- 
ra MNI e imprime Willie com as pernas 
juntas, na mesma posição de antes, O 
que o deixa efetivamente parado. 


+. PRESSE, 


O programa a seguir permite que 
Willie inicie sua corrida pará o topo da 
montanha e verifica se ele encontrou al- 
gum perigo ou recompensa. Caso você 
esteja usando o Assembler de INPUT, 
precisará fazer uma alteração: na linha 
$010, o comando DIM T$(100) muda 
para DIM T$(200), uma vez que a roti- 
na aqui apresentada é muito extensa. 


10 orq 54603 


20 ld - (=-5202) 
30 cp O 

40 jp nz,pl 

50 ld a, (-5203) 
60 cp 1 

70 jp z, wa 

Bo ld h1l, (62407) 
90 ld de, (-5205) 
100 add hl,de 
110 push h1 

120 dec hl 

130 ld a,255 
140 push hl 
150 call 77 
160 pop h1 

170 ld de,32 
180 add hl,de 
190 ld a,255 
200 call 77 
210 pop hl 

220 ld a,0 

230 push hl 

240 call 77 
250 pop h1 

260 ld de,32 
270 add hl,de 
280 ld a,l 

290 push hl 
300 call 77 
310 pop hl 

320 ld de,32 
330 add hl,de 
340 call 74 


350 
360 
370 
380 
390 
400 
410 
420 
430 
440 
450 
460 
470 
480 
490 
500 
510 
520 
530 
540 
550 
560 
570 
580 
590 
600 
610 
620 
630 
640 
650 
660 
670 
680 
690 
700 
710 
720 
730 
740 
750 
760 
770 
780 
790 
B00 
810 
820 
B30 
840 
850 
B60 
870 
B80 
B90 
900 
910 
920 
930 
940 
950 
960 
970 
980 
990 
1000 
1010 
1020 
1030 
1040 
1050 
1060 
1070 


cp 72 

Jp Z.mre 
cp 74 

JP Z,;mre 
cp 37 

jp z.mre 
cp 254 
jp z.mre 
ld a,4 
call 321 
bit 2,a 
ir nz,mf 
ld b,l 
bit 3,a 
jr nz,ml 
ld b,129 
mil ld a,b 


jr mc 

mf bit 3,a 
jr nz,mc 
ld a,l 


ld (-5203) ,a 
mc ld h1,(-5205) 


ld de,222 
Bbc hl,de 
jr nz,mo 
ld a,l 


ld (-5201),a 


mo ret 


wa ld h1, (62407) 
ld de, (-5205) 


add hl,de 
ld de,33 
add hl,de 
push hl 
call 74 
pop hl 

cp 36 

jr z,;mre 
cp 52 

yr z.mt 
cp 13 

jr zmre 
cp 17 

jr z.mre 
ld de,32 
add hl,de 
call 74 
cp 72 

jr z.mre 
cp 74 

jr z.mre 
cp 254 

Jr zemre 
cp 37 

jr z.mre 


ld h1, (62407) 
ld de, (-5205) 


add hl,de 
ld a,4á 
push hl 
call 77 
pop hl 
inc hl 

ld a,6 
push h1 
call 77 
pop h1 
ld de,32 
add hl,de 
ld a,7 
push hl 





DERLLEL CEE Oi SSI 


1080 call 77 

1090 pop hl 

1100 dec hl 

1110 ld a,5 

1120 call 77 

1130 ld h1,(-5205) 
1140 inc h1 

1150 ld (-5205),hl 
1160 mt ld a,0 
1170 ld (-5203)sa 
1180 ret 

1190 mre ld a,2 
1200 ld (-5201),a 
1210 ret 

1220 pl ret 

1230 end 


Você pode executar essa rotina mes- 
mo sem as duas restantes, que comple- 
tam o programa de movimentação de 
Willie. Embora esta parte possa chamar 
as demais, não haverá erro. Uma instru- 
ção ret, que apagaremos mais tarde, foi 
colocada no fim da rotina — assim, se 
uma seção inexistente for acessada, o 
programa simplesmente retornará. 


O QUE WILLIE VAI FAZER? 





A variável armazenada em — 5202 in- 
dica se Willie vai ou não pular. O con- 
teúdo dessa posição é carregado no acu- 
mulador e comparado com O, Se não for 
0, o personagem tem que pular e o pro- 
cessador salta para a rotina pl. Esta ain- 
da não foi publicada e, no seu lugar, o 
processador encontra apenas uma ins- 
trução ret, voltando para a rotina prin- 
cipal do jogo. 

Se Willie não deve pular, ou seja, se 
o conteúdo de —5202 é 0, o processador 
continua a execução da rotina. O con- 
teúdo da posição de memória —5203, 
que guarda a variável da caminhada, é 
carregado no acumulador. 

Há duas figuras para Wille — uma 
com as pernas juntas e a outra com as 
pernas abertas. Quando ele está parado, 
a primeira figura é impressa continua- 
mente no mesmo lugar. Mas, quando es- 
tá andando, as duas figuras são impres- 
sas alternadamente. A variável da cami- 
nhada indica ao processador se Willie 
deve andar uma posição — nesse caso, 
usa-se a figura de pernas abertas. 

A instrução cp 1 verifica se o perso- 
nagem deve andar. Se o valor for 1, jp 
z,wa manda o processador para a roti- 
na que faz Willie andar uma posição. 
Do contrário, o processador continua a 
executar a mesma rotina. 


“ANIMAÇÃO 





Quando está andando, Willie abre as 
pernas e dá um passo à frente, apare- 


cendo com as pernas juntas. Temos es- 
ta sequência (Cada item significa uma 
chamada na rotina de movimentação): 
- Willie é impresso com as pernas jun- 
tas porque está imóvel; a tecla N foi 
pressionada e a variável, ajustada. 

- Willie é impresso com as pernas aber- 
tas pela rotina que o faz andar; sua po- 


sição é incrementada e a variável da ca- 


minhada é ajustada com zero no fim da 
rotina. 

- Willie é impresso com as pernas jun- 
tas, uma posição à frente, e as teclas são 
testadas. 

Com as pernas abertas, o persona- 
gem ocupa duas posições adjacentes; 
com as pernas juntas, uma. Garantimos 
assim um efeito de movimentação suave. 

Como você pode concluir da sequên- 
cia acima, toda vez que Willie for im- 
presso com as pernas fechadas, a posi- 
ção anterior deve ser apagada. Caso 
contrário, partes da figura serão deixa- 
das pelo caminho. 

O par HL é carregado com o endere- 
ço inicial da Tabela de Nomes (TN) da 
VRAM, que se encontra nas posições 
62407 e 62408. A posição de Willie na 
tela, que está em —5205 e — 5204, é co- 
locada em DE. Os dois valores são so- 
mados em HL, que passa a conter o en- 
dereço de Willie na TN da VRAM. Es- 
se endereço é guardado na pilha. 

O endereço em HL é decrementado 
— O que corresponde a voltar uma po- 
sição na tela. Esse valor também é guar- 
dado na pilha. O acumulador é carre- 
gado com 255, o código do padrão va- 
zio usado como céu, e a rotina 77 da 
ROM é chamada. Como você deve se 
lembrar, ela escreve o valor do acumu- 
lador no endereço da VRAM apontado 
por HL. 

O último valor de HL é recuperado 
da pilha e adicionado a 32, por DE. Is- 
so faz HL apontar para a posição logo 
abaixo da anterior. O acumulador é no- 
vamente carregado com 255, o padrão 
de céu, e a rotina 77 é chamada. 

Todo esse procedimento teve como 
finalidade apagar a metade esquerda do 
nosso personagem que, com as pernas 
abertas, ocupa quatro posições. A me- 
tade direita será apagada quando a fi- 
gura for impressa com as pernas juntas, 
sobreposta à anterior. Repare que isso 
poderia ser desnecessário se Willie já es- 
tivesse com as pernas juntas — mas é 
uma precaução sempre tomada. 


IMOBILIDADE 


Precisamos agora imprimir a nova fi- 
gura com as pernas juntas. A posição 
que foi armazenada na pilha é recupe- 
rada em HL. O acumulador é carrega- 





do com 0, código do primeiro padrãc 
para essa figura, Guarda-se o valor de 
HL na pilha e a rotina 77 é chamada. 

Ao endereço, recuperado da pilha & 
colocado em HL, adiciona-se.32 — o 
que significa apontar uma posição abai- 
xo. O acumulador é carregado com 1, 
código do segundo padrão da figura. O 
valorde HL é guardado na pilha e a ro- 
tina 77 é chamada, Feito isso, a figura 
de Willie com as pernas juntas já está 
impressa. 





ONDE WILLIE ESTÁ PISANDO? 


Como Willie se moveu uma posição 
à frente, convém verificar onde ele está 
pisando. Note que, mesmo que o per- 
sonagem estivesse parado, esta parte da 
rotina seria executada. Se ele estiver pi- 
sando numa cobra, num buraco ou na 
água, o processador deve ser informa- 
do de sua morte. 

A primeira coisa a fazer é verificar 
qual o código do padrão que está sob 
os pés de Willie. O endereço que o pa- 
drão dos pés ocupa na TN da VRAM 
é recuperado da pilha e colocado no par 
HL. O valor 32 é somado a esse endere- 
ço por meio do par DE, fazendo com 
que ele passe a apontar para a posição 
imediatamente abaixo dos pés de Wil- 
lie. A rotina 74 da ROM é chamada e 
faz a leitura da VRAM, devolvendo a 
A o valor da posição apontada por HL. 

Com isso, o acumulador passa a con- 
ter o código do padrão no qual Willie 
está pisando. Esse valor é comparado 
com 72 e 74, os padrões de mar; com 
37, o padrão da cabeça da cobra, e com 
254, o padrão do buraco. Se qualquer 
um desses valores estiver presente, a ins- 
trução jp z;mre manda o processador 
para a rotina mre, que elimina nosso 
personagem. Caso contrário, o proces- 
sador continua executando a rotina — 
Willie está salvo. 


HORA DE SALTAR 





A impressão de Willie com as pernas 
juntas corresponde, efetivamente, ao 
fim da ação nesta parte da rotina. Des- 
de que o personagem não tenha morri- 
do, deveremos verificar se ele irá se mo- 
ver na próxima vez. Para isso, exami- 
namos a matriz do teclado. 

O teclado do MSX é controlado pela 
interface de periféricos PPI (8255). Ca- 
da tecla faz parte de uma matriz e ocu- 
pa uma linha e coluna determinadas. 
Para verificar se uma tecla está sendo | 
pressionada, mandamos um sinal para 
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a linha que ela ocupa e checamos se o 
bit correspondente à sua coluna tem va- 
lor 0. Essas operações envolvem escrita 
e leitura na PPI e podem ser implemen- 
tadas com instruções im e out nos ende- 
reços adequados. No nosso caso, a ro- 
tina 321 da ROM realiza a tarefa. Para 
isso, basta colocar no acumulador a li- 
nha da matriz do teclado que queremos 
pesquisar. A rotina 321 devolve nos bits 
do acumulador a situação de todas as te- 
clas dessa linha; se o bit corresponden- 
te à tecla for 0, ela está sendo pres- 
sionada. 

Como as teclas M e N ocupam a 
quarta linha da matriz do teclado, o acu- 
mulador é carregado com 4. Em segui- 
da, a rotina 321 é chamada. A instru- 
ção bit 2,a analisa o bit dois do número 
encontrado para verificar se a tecla M 
está sendo pressionada. Todos os bits 
correspondentes às teclas têm, normal- 
mente, valor 1. Quando a tecla é pres- 
sionada, porém, eles assumem o valor 
0. Se a tecla M foi pressionada, o bit 
dois tem valor 0. 

Nesse caso, o processador ignora a 
instrução jr nz. Mas, se M não tiver si- 
do pressionada, ele salta para a rotina 
mf. Como a tecla M foi pressionada, 
Willie deve pular; o registro B é carre- 
gado com 1. 

Depois o bit três é testado da mesma 
maneira. Se N não foi pressionada, o bit 
três tem valor 1 e a instrução jr nz faz 
o processador saltar a próxima instru- 
ção. Mas, se a tecla N foi pressionada, 
jr nz não tem efeito e B é carregado com 
129. 

Seja como for, o processador trans- 
fere o conteúdo de B para À e o coloca 
em -5202. Esta, como você se lembra, 
é a posição de memória que o processa- 
dor examina no início da rotina, para 
ver se Willie deve ou não pular. 

O significado dos números 1 e 129 se- 
rá explicado nas duas próximas seções 
de Avalanche, que executam o salto ver- 
tical e o salto à frente. 

A instrução jr mc faz o processador 
pular a próxima parte. 





WILLIE DEVE ANDAR? 


Se a tecla M não foi pressionada, o 
processador vai para a rotina mf, que 
checa se a tecla N foi pressionada — ou 
seja, se Willie não irá pular, mas, sim- 
plesmente, andar. 

O bit três é testado para ver se a te- 
cla N foi pressionada. Note que a leitu- 
ra da matriz do teclado ainda se encon- 
tra no acumulador — o processador pu- 
lou para esta parte da rotina depois que 
o bit dois foi testado. 

Se a tecla N não tiver sido pressiona- 


da, a instrução jr nz salta a próxima par- 
te. Caso contrário, A é carregado com 1 
e esse valor vai para o endereço —5203, 
onde se encontra a variável da caminha- 
da, examinada no início da rotina. Nes- 
sa posição o valor 1 indica que deve ser 
impressa a figura de Willie que tem as 
pernas abertas — portanto, ele está 
andando. 


PRÊMIOS 





Falta verificar apenas um elemento; 
Willie pegou o seu prêmio? 

A posição do personagem é armaze- 
nada nos endereços -5205 e —-5204. O 
conteúdo desses endereços é dado pelo 
par HL. O valor 222, que corresponde 
à posição de tela onde o prêmio foi im- 
presso, é colocado no par DE. 

O conteúdo de DE é subtraído do 
conteúdo de HL. Se o resultado for di- 
ferente de O, Willie não alcançou o prê- 
mio. A instrução jr nz,mo salta então 
as próximas instruções. Mas, se o resul- 
tado for 0, o personagem já obteve prê- 
mio e o valor 1 é carregado em -5201 
através do acumulador. Esta é a posi- 
ção que a rotina principal examina, in- 
formando se o escore deve ser aumen- 
tado e outro nível iniciado. Feito isso, 
o processador encontra a instrução ret 
e retorna. 





| UM PASSO À FRENTE | 


Antes de prosseguir, Willie deve ve- 
rificar o que existe à sua frente. Sua po- 
sição é colocada no par DE; o endereço 
inicial da TN da VRAM, em HL. Os 
dois valores são somados em HL, que 
passa a conter o endereço na TN que 
corresponde à posição da cabeça de Wil- 
lie na tela. O valor 33 é somado em HL, 
movendo o apontador uma linha para 
baixo e uma posição para a direita — 
em outras palavras, para a posição 
adiante dos pés de Willie. Esse valor é 
guardado na pilha e, em seguida, a ro- 
tina 74 da ROM é chamada para fazer 
a leitura da VRAM. 

O código do padrão que está na fren- 
te dos pés de Willie se encontra no acu- 
mulador. Ele é comparado com 36, pa- 
drão da língua da cobra; com 13 e 17, 
padrões da pedra, e com 52, padrão da 
encosta. Se os padrões da pedra ou da 
cobra estão presentes, a instrução jr 
z,mre faz o processador saltar para a ro- 
tina que elimina Willie. Mas, se na po- 
sição estiver o padrão da encosta, o pro- 
cessador salta para a rotina que deixa 
Willie parado. Obviamente, ele não po- 
de ir em frente a não ser pulando. 


Não basta, porém, identificar o pa- 
drão que está na frente de Willie. Pre- 
cisamos saber, também, em que padrão 
ele pisará depois que se mover. Para is- 
so, DE é carregado com 32 e somado ao 
conteúdo de HL, que aponta para uma 
posição abaixo da anterior. 

A rotina 74 é novamente chamada e 
o conteúdo do acumulador comparado 
com os padrões do mar, do buraco e da 
língua da cobra. Se qualquer um desses 
valores estiver presente, a instrução jr 
z,mre vai para a rotina da morte. Se na- 
da disso aconteceu e o personagem ain- 
da está vivo, o par HL é carregado com 
o endereço inicial da TN, e DE, com a 
posição de Willie na tela. Esse valor é 
somado em HL. 

A rotina 77 é chamada quatro vezes 
para imprimir os quatro padrões da fi- 
gura de Willie com as pernas abertas, 
cujos códigos são 4, 5, 6 e 7. 

A posição do personagem é carrega- 
da de -5205 e-5204 para o par HL, in- 
crementada e devolvida. Com isso, atua- 
lizamos a posição de Willie. Na próxi- 
ma vez, ele começará deslocado um ca- 
ractere para a direita. 


AINDA PARADO 


A rotina mt é chamada diretamente 
quando Willie se depara com a encos- 
ta, não podendo prosseguir a não ser 
com um pulo. O processador, porém, 
chega a essa rotina quando o persona- 
gem foi impresso com as pernas abertas. 

Um valor O é carregado no endereço 
— 5203, por intermédio do acumulador, 
indicando ao processador que, na pró- 
xima vez, a figura de Willie deve ser im- 
pressa com as pernas juntas, no mesmo 
lugar ou uma posição à frente, depen- 
dendo do que aconteceu. 

Em seguida, o processador retorna. 





O ÚLTIMO SUSPIRO 


“Se Willie se afogou no mar, foi pica- 
do por uma cobra, caiu num buraco ou 
foi atingido por uma pedra, a rotina mre 
é chamada, informando ao resto do pro- 
grama que Willie morreu. 

Para que se divulgue essa informa- 
ção, o valor 2 é colocado no endereço 
- 5201, que será examinado em algum 
ponto do jogo. As providências para O 
funeral de Willie serão, então, tomadas. 

Feito isso, o processador retorna. 

O último ret da listagem, precedido 
do rótulo pl, será apagado pela próxi- 
ma rotina de Avalanche. Sua única fun- 
ção é evitar que, na falta das rotinas, 
ocorra algum erro. 








UMA PLANILHA 


ELETRÔNICA (3) 


Com este artigo, encerramos nossa 
série sobre planilhas eletrônicas. 
Depois de acrescentar ao programa as 
linhas aqui apresentadas, você poderá 
explorar todo o seu potencial. 


Para ter uma planilha completa e 
operacional, carregue na memória do 


seu micro as partes já dadas do progra- 
ma e acrescente as linhas que faltam. 
Nos artigos anteriores, mostramos, por 
meio de exemplos, como montar uma 
planilha. Agora, que você já tem todo 
o programa, veremos como utilizá-lo. 

As instruções que se seguem são vá- 
lidas para todas as máquinas. As dife- 
renças existentes entre o Spectrum e os 
demais microcomputadores serão sem- 
pre especificadas. 


COMO DAR ENTRADA 

ÀS EQUAÇÕES 

CÓPIA ABSOLUTA E RELATIVA 

Er O USO DE CONSTANTES 


MONTAGEM DAS EQUAÇÕES 


O que faz da planilha eletrônica uma 
ferramenta tão versátil é sua capacida- 
de de trabalhar com equações. Não se 
assuste com a palavra equação: nossas 
“equações” não passam de especifica- 
ções bastante simples das operações arit- 
méticas de adicionar valores das colu- 
nas, obter o total de uma determinada 
linha, calcular porcentagem etc. Os ope- 










































USE A PLANILHA 
COM MAIS EFICIÊNCIA 


Agora que você dispõe de um pro- 
| grama para a elaboração de uma plani- 
lha de cálculo, convém conhecer al- 
| guns “truques” que lhe permitirão uti- 
| lizá-la de maneira bem mais rápida e efi- 
| ciente: 





e Preenchimento da planilha: depois de 
definir o título geral e os subtítulos das 
seções, dedique-se ao “esqueleto da 
planilha, ou seja, à identificação das li- 
nhas e colunas. Em seguida, coloque 
os dados propriamente ditos e, final- 
mente, as fórmulas. Procedendo assim, | 
você diminuirá as chances de cometer | 
erros de entrada e evitará que se exe- 
cutem cálculos antes que todos os da- 
dos e rótulos estejam presentes. 





e Cuidado com os laços sem fim: esse 
tipo de problema pode ocorrer quan- 
do se colocam duas fórmulas em célu- 
las diferentes, uma utilizando o resul- 
tado do cálculo da outra. Em conse- 
quência, o programa “emperra””, pois 
a detecção de uma situação como es- 
ta não foi prevista. Não deixe de veri- 
ficar todas as fórmulas antes de exe- 
cutar o programa. 


radores usados são: mais (+), menos 
(—), vezes (*), dividido (/), por cento 
(%), total de linhas (&) e total de colu- 
nas ($). 

Para escrever uma equação, indica- 
se o nome da primeira célula, depois o 
nome da segunda célula e, por último, 
o operador. Vejamos alguns exemplos. 
Se colocarmos AIA2+ na célula Cl, 
obteremos a soma dos valores contidos 
em Al e A2 na célula Cl. A equação 
A1A10$ soma todos os valores da colu- 
na A, da linha 1 até a linha 10. Da mes- 
ma maneira, A6F6& soma todos os va- 
lores da linha 6, começando na coluna 
A e terminando na coluna F. Finalmente, 
ASB2% é calculado como A5S*B2/100, 
o que dá B2 por cento de AS. As equa- 
ções são colocadas nas células em que 
se quer que apareçam os resultados. 

Com exceção das versões destinadas 
ao Spectrum e ao Apple, o programa 
permite ainda que se acrescente um nú- 
mero no fim da equação para especifi- 
car a quantidade de casas decimais que 
aparecem na resposta. 


CÓPIA ABSOLUTA E RELATIVA 


O programa oferece a alternativa de 
se copiar o conteúdo de uma célula. Is- 
so nos poupa o trabalho de redigitar 
uma fórmula em todas as células em que 
será usada. Podemos escolher entre uma 
cópia absoluta ou relativa. A cópia ab- 
soluta produz uma réplica idêntica da 
célula, onde quer que você queira, seja 
numa única célula, seja numa coluna in- 
teira. A cópia relativa, usada especial- 
mente para equações, sofre alterações 
conforme a linha e a coluna para onde 
está sendo copiada. 

Suponhamos que você tem AlB1* na 
célula Cl e quer que toda célula da co- 
luna C contenha o produto das duas co- 
lunas anteriores — ou seja, AZ2B2* em 
C2, A3B3* em C3 etc. A cópia relativa 
faz isso para você. O procedimento é o 
seguinte: pressione a tecla de cópia (ve- 
rifique, adiante, qual a tecla que seu mi- 
cro usa), selecione R (para relativa) e co- 
loque o cursor sobre a célula a ser co- 
piada (no Spectrum, digita-se o nome da 
célula). Em seguida, defina se a cópia 
deve ser feita em linha ou coluna — no 
nosso caso, pressione C. Finalmente, di- 
gite o nome da célula inicial (Cl) e da 
final (C10, por exemplo). O programa, 
assim, preencherá toda a coluna para 
você. 

Experimente também copiar valores 
em linhas e obter cópias absolutas de 
equações e valores. 





CONSTANTES 


Precisamos, com frequência, utilizar 
constantes em uma equação — por 
exemplo, um valor como 17, para cal- 
cular a porcentagem do ICM, ou como 
10, para calcular descontos. 

Como não se pode colocar números 
diretamente em uma equação — que é 
baseada no conteúdo de duas células —, 
empregam-se diferentes métodos para a 
introdução de constantes. 

No Spectrum, elas costumam ser pre- 
cedidas pela letra Z. Assim, AlZI7% 
calcula o ICM de um valor colocado na 
célula Al. Nos demais micros, as cons- 
tantes devem ser colocadas na coluna Z. 
Retomando o último exemplo: o valor 
17 será colocado na célula Z1 e a equa- 
ção tomará a forma AlZl%. 

Esse procedimento é necessário por- 
que os valores das constantes não devem 
ser alterados nem mesmo quando se op- 
ta por uma cópia relativa. Se reservar- 
mos uma coluna para elas, estaremos as- 
segurando um tratamento diferenciado 
na hora da cópia. 


O USO DO PROGRAMA 





Existem algumas variações, de má- 
quina para máquina, no que diz respei- 
to à colocação de valores, rótulos e 
equações na planilha, assim como à exe- 
cução das operações. Comentaremos, 
em seguida, os detalhes específicos pa- 
ra cada microcomputador. 


OU programa do Spectrum demora um 
pouco para definir as variáveis internas. 
Assim, você terá uma tela vazia por al- 
guns momentos após teclar RUN. A te- 
la aparece no modo de valores — o que 
significa que valores e rótulos podem ser 
inseridos. Pressione E para passar ao 
modo de equação e V para voltar ao de 
valores. Para introduzir um dado em 
uma célula, use as teclas de controle do 
cursor; ao chegar à célula correta, pres- 
sione I. Em seguida, digite o que quiser. 

As equações são mostradas sobre 
fundo amarelo, com os valores em pre- 
to e os rótulos em azul. Considera-se ró- 
tulo qualquer dado digitado no modo de 
valores que comece com uma letra. Co- 
mo as cores aparecem em qualquer mo- 
do, você pode distinguir facilmente as 
células que contêm equações mesmo que 
esteja vendo a folha no modo de valo- 
res ou vice-versa. 

A tela exibe apenas quatro colunas e 
dez linhas de cada vez, mas é possível 
mudar para outra parte da planilha pres- 
sionando-se simultaneamente as teclas 
de controle do cursor e <SYMBOL 
SHIFT>. 

Tente inserir alguns valores e rótulos, 
mude para o modo de equações e some 
os valores das colunas € linhas. Para ver 
o resultado dos cálculos, volte para a tela 
de valores e pressione C e <SYMBOL 
SHIFT >. Se algum número for muito 
grande e não couber na célula, os dígi- 
tos da direita serão eliminados e os que 
permanecerem na tela ficarão piscando 
como aviso. 

Agora, experimente copiar algumas 
equações e valores usando a tecla Z. O 
programa pedirá toda a informação que 
for necessária. 

Segue-se a lista de comandos usados 
pelo programa: 
mostra a tela de valores; 

' mostra a tela de equações; 

insere um dado em uma célula; 

seguido de <ENTER> apaga um 

valor ou rótulo; 

I seguido de 4 apaga uma equação, 

C mais <SYMBOL SHIFT > calcula 
os valores da planilha; 

<SPACE> mais <SYMBOL SHIFT > 








interrompe os cálculos; 

Z copia uma célula; 

S mais <SYMBOL SHIFT> grava 
dados em fita; 

J mais <SYMBOL SHIFT > carrega 
dados da fita; 

P imprime a tela em uma impressora; 

Teclas de controle do cursor movem o 
cursor; 

Teclas de controle mais <SYMBOL 
SHIFT > movem a janela de texto. 


vu Ea 


Ao executar O programa, você verá 
apenas a parte superior esquerda da pla- 
nilha; se quiser examinar qualquer ou- 
tra parte, recorra às teclas de controle 
do cursor (no micro Apple, mova o cur- 
sor para cima e para baixo usando as te- 
clas A e Z). Você pode também passar 
diretamente para qualquer ponto da pla- 
nilha digitando G. 

As teclas V e E alternam as telas de 
equações e valores. E possível entrar va- 
lores nas duas telas, mas os resultados 
só serão mostrados na tela de valores. 
Para inserir um dado em uma célula, 
mova o cursor até ela e pressione 1. De- 
pois, digite sua entrada, 

As equações são digitadas conforme 
descrevemos anteriormente. No TRS- 
Color e no MSX podemos discriminar 
o número de casas decimais do resulta- 
do. AlIB1/2, por exemplo, mostra o re- 
sultado de Al dividido por Bl com duas 
casas decimais. Esse recurso é muito útil 
quando estamos lidando com valores fi- 
nanceiros. No caso de obtermos núme- 
ros que excedam o tamanho da célula, 
a mensagem <OV> será exibida. 

Eis as teclas usadas no programa: 
V mostra a tela de valores; 

E mostra a tela de equações; 

[| insere um rótulo, valor ou equação; 

C copia uma célula; 

S grava dados no cassete ou disco; 

L lê dados do cassete ou disco; 

Q sai do programa; 

Teclas de controle do cursor movem o 
cursor e a janela de texto (no Apple, 
usam-se A e Z para mover O cursor 
para cima e para baixo). 


910 IF z=3 THEN LET v(1)=( 
CODE s$(1))-64: LET v(2)=VAL & 
$(2): LET v(3)=(CODE s$(3))-64 
+ LET v(4)=VAL s$8(4 TO 5): LET 
0$=s3 (6) : RETURN 

920 IF z=á4 THEN LET v(1l)=( 
CODE 9s$(1))-64: LET v(Z)=VAL & 
s(2 TO 3): LET v(3)=(CODE ss(4 
1)-64: LET v(4)=VAL 9S(5 TO 6) 
: LET 0$=88(7): RETURN 





930 IF 2z=5 THEN LET v(l)=( 
CODE s$(1))-64: LET v(Z)=VAL & 
S(2): LET v(3)=(CODE s$(3))-64 
- LET v(4)=VAL 98(4): LET 03=8 
S (5): RETURN 
940 IF 2z=6 THEN LET v(1)=( 
CODE n8(1))-64: LET v(Z)=VAL & 
(2 TO-3): LET v(3)=(CODE sS(4 
))-64: LET v(4)=VAL B5(5): LET 
0$=95(6): RETURN 
950 IF z=7 THEN LET v(1)=( 
CODE s$(1))-64: LET v(2)=VAL & 
8(2): LET v(3)=(CODE s$(3))-64 
LET v(4)=VAL s$(4 TO 5): LET 
o$=s5 (6): RETURN 
960 IF z=8 THEN LET v(1)=( 
CODE s$8(1))-64: LET v(2Z)=VAL 8 
s(2 TO 3): LET v(3)=(CODE sS(4 
1)-64: LET v(4)=VAL sS(5 TO 6) 
:» LET 0$=n$(7): RETURN 
970 IF 2z=9 THEN LET v(1l)=( 
CODE s$S(1))-64: LET v(2Z)=VAL 8 
s(2): LET v(3)=(CODE s$(3))-64 
- LET v(4)=VAL sS(4 TO 6): LET 
0o$=s5(7): RETURN 
980 IF z=10 THEN LET v(1)=( 
CODE sS(1))-64: LET v(2)=VAL & 
8(2 TO 3): LET v(3)=(CODE s$S(4 
))-64: LET v(4)=VAL 9S(5 TO 7 
): LET o$=9$(B): RETURN 
990 LET v(1)=(CODE s$S(1))-64: 
LET v(Z2)=VAL sS(2): LET v(3)=( 
CODE 9$(3))-64: LET v(4)=VAL 8 
s(4 TO 7): LET o$=sS(8B): 
RETURN 
1000 RETURN 
1010 IF ds(v(2),v(1),1)>"9” THE 
N LET t=0: RETURN 
1020 IF v(3)=26 THEN LET b=v(4 
)j: LET a=VAL d5S(v(2) vil), To 8 
)j: GOTO 1050 
1030 IF ds(v(4),v(3),1)>2"9” THE 
N LET t=0: RETURN 
1040 LET a=VAL dS(v(2),v(l), TO 


8): LET b=VAL dS(v(4),v(3), TO 
8) 
1050 IF 0$="+" THEN LET t=a+b 
RETURN 
1060 IF o$="-" THEN LET L=a-b 
RETURN 


1070 IF 0$="/”" AND b=0 THEN Li 


T t=0: RETURN 


1080 IF 08="/" THEN LET t=a/b: 
RETURN 

1090 IF 0$="*" THEN LET t=a*b: 
RETURN 
1100 IF 0$="%" THEN LET t=(a*t 
)/100: RETURN 

1110 IF 0$8="S" THEN LET t=0: EF 

OR s=v(2) TO v(4): LET t=L+VAL 

ds(s,v(1l), TO 8): NEXT s: RETUR 

N 


1120 IF o$="&" THEN LET t=0: F 
OR s=v(1) TO v(3): LET L=L+VAL 
ds (v(2Z),s, TO 8): NEXT 5: RETUR 


N 

1130 RETURN 

1140 IF z=1 THEN IF VAL aS(2)= 
O OR VAL a$(4)=0 THEN LET f=1: 
RETURN 

1150 IF z=2 THEN IF VAL as(2 T 

O 3)>30 OR VAL aS(2 TO 3)=0 OR 





VAL aS(5)=0 THEN 
RN 
1160 IF z=3 THEN IF VAL as(4 T 
O 5)>30 OR VAL as(4 TO 5)=0 OR 
VAL aS(2)=0 THEN LET £=1: RETU 
RN 
1170 IF z=4 THEN IF VAL as(2 T 
O 3)>30 OR VAL as(5 TO 6)>30 OR 
VAL aS(2 TO 3)=0 OR VAL as(5 T 
O 6)=0 THEN LET £=1: RETURN 
1180 IF z=5 OR z=7 OR z=11 THEN 
IF VAL a$S(2)=0 THEN LET f=l1: 
RETURN 
1190 IF z=6 OR z=B OR z=10 THEN 
IF VAL aS(2 TO 3)=0 OR VAL as 


LET £=1: RETU 


(2 TO 3)2>230 THEN LET f=1: RETU 
RN 
1200 LET s$=" "1: FOR qg=1 


TO c: LET sS(g)=aS(g): NEXT q: 
GOSUB 890: IF o$="4&" AND (v(l) 
>v(3) OR v(2)<>v(4)) THEN LET 
£f=1: RETURN 

1210 IF 08="$”" AND (v(1)<>v(3) 
OR v(2)>v(4)) THEN LET £f=1: RE 
TURN 

1220 LET f=0: RETURN 

1230 LET gS=dS(vy+rwy, x+wx,17) 
1240 PRINT FLASH 0+(9g8="5" AND 
ES="VAL”); INK 0+(2 AND q8="4" 
); PAPER 7-(2 AND 95="2")-(g5=" 
1” OR g5="5");AT y*2+2,x*9+5; (d 
S(v+twy,x+vx, TO 8) AND tS="VAL" 


Js(ds(y=wy,xtux,9 TO 16) AND ts 
=" TGUA"): RETURN . 
1250 SOUND .4,10 

1260 LET 98=" ":. LET os= 


Ú 
1270 PAUSE 20: PRINT AT cy*2, (c 
x-1)*9+5+08; BRIGHT 1; OVER 1;* 


1280 IF CODE INKEY5>30 AND CODE 
INKEY5<128 THEN LET sS(os+l)= 
INKEYS: PRINT AT cy*2, (cx-1)*9+ 
St+tos;sS(os+1): LET os=os+l: GOT 
o 1350 
1290 IF CODE INKEY$S=12 AND 05>0 
THEN LET os=os-l: LET sS(ost+l 
)j="": PRINT AT cy*2, ((cx-1)*9)+ 
5458; OVER O; BRIGHT 0;” ": GO 
TO 1270 
1300 IF CODE INKEY$S=13 AND s5=" 
”" THEN RETURN 
1310 IF CODE INKEY5=13 AND t5=" 
VAL” AND CODE s$(1)>264 THEN LE 
T dS(wy+cy-l,wxtcx-1,17)="2": L 
ET dS(wytcy-l,wx+tcx-1l, TO 8)=a5 
LET vy=cy-l: LET x=cx-1: GOSUB 
1230: RETURN 
1320 IF CODE INKEY$=13 AND t$S=" 
VAL " THEN GOSUB 1380: LET os= 
O: LET dS(wytcy-l,wx+tcx-l, TO 8 
J=a8: LET vy=cy-l: LET x=cx-l: G 
OSUB 1230: RETURN 
1330 IF CODE INKEY$=13 AND t$=" 
IGUA”" THEN GOSUB 1380: LET oss= 
O: LET dS(wytcy-l,wx+tcx-1,9 TO 
16)=s$: LET x=cx-l: LET y=cy-l:; 
GOSUB 1230: RETURN 
1340 GOTO 1270 
1350 IF os=B AND tS="VAL” THEN 
SOUND .1,-10: GOSUB 1380: LET 
dS(wytcy-L,wx+tcx-1, TO 8)=s$3: L 


ET y=cy-l: LET x=cx-l: GOSUB 12 

30: RETURN 

1360 IF 0s=8 AND tS="IGUA” THEN 
SOUND .1,+10: GOSUB 1380: LET 


dS twy+cy-1l,wx+tcx-1,9 TO 16)=55 


LET y=cy-1l: LET x=cx-1l: GOSUB 
1230: RETURN 
1370 GOTO 1270 
1380 PRINT AT cy*2, ((cx-1)*9)+5 
+os; BRIGHT O; OVER 1;" ” 
1390 IF tS="IGUA" THEN  GOSUB 1 
490: RETURN 
1400 GOSUB 1410: PRINT AT cy*2, 


(cx-1)*9+5;95S: RETURN 

1410 LET b$=" 000": FOR 
u=l TO os: LET bS(u+(8-08)) =sS( 
u): NEXT u 

1420 FOR u=l TO 11 

1430 IF bS(u)<>".”" THEN NEXT u 
1440 IF ub=l1 THEN LET b$S(9)=" 
*. LET sS=bS(4 TO ): RETURN 
1450 LET w=6-u 


1460 IF w<O THEN LET w=ABS w+l 


LET s$=bS(w TO w+8): RETURN 
1470 LET s$=" n 
1480 FOR u=l TO 8-w: LET sS(w+u 
|=bS (u): NEXT u: RETURN 
LET 9g5= 


1490 IF s5(1)="4" THEN 
j ". LET dS(wy+cy-1L,wx+e 

x-1,17)="0": RETURN 

1500 LET a$="": FOR z=1l TO B: L 
ET a$=aS+(sS(z) AND sS(z)<>" ") 
1510 NEXT z: LET c=LEN as 

1520 IF c<4 THEN LET dS(wy+tcy- 
L,wxtcx-1,17)="4": RETURN 

1530 RESTORE 1630: FOR z=1 TO 1 
1: LET f=0: READ m$ 

1540 FOR w=1 TO € 

1550 IF mS(w)="A” THEN GOSUB 1 

650: IF f THEN GOTO 1610 

1560 IF mS(w)="N” THEN GOSUB 1 

670: IF f THEN GOTO 1610 

15720 IF mS(w)="0" THEN GOSUB 1 

690: IF £f THEN GOTO 1610 

1580 IF mS(w)="Z" THEN GOSUB 1 

710: IF £ THEN GOTO 1610 
1590 NEXT w: GOSUB 1140: 
£ THEN LET s$=" çã 


IF NOT 
FOR 
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15 Entrada das equações no Spectrum. 
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w=] TO c: LET sS(w)=aS (w): NEX 

T w: LET dS(wytcy-l,wx=cx-1,18) 

=CHAS z: LET ds lwytcy- 1 ,wuxtcx-1 

:17)="1”": RETUABN 

1600 GOTO 1620 

1610 NEXT z 

1620 LET ds(wytcy-1l,wxtcx-1,17) 

="4": RETUAN 

1630 DATA "ANAN0O00"”,"ANNANOO” ,” 

ANANNOO” ," ANNANNO” 

1640 DATA "ANZN0000","ANNZN000” 

|, "ANZNNO00”" ," ANNZNNOO” , ANZNNNO 

O", "ANNZNNNO”," ANZNNNNO” 

1650 IF aS(w)>D="A” AND as (w)<=" 

Y“”" THEN RETURN 

1660 LET f=1: RETURN 

1670 IF aS(w)>="0" AND aS(w)<=" 

9” THEN RETURN 

1680 LET f£=1: RETURN 

1690 LET cS=aS(w): IF c$="+" OR 
cS="-" OR c$="*" OR cS$="/" OR 

cS="4t" OR c$="5" OR c$="8" THEN 
RETURN 

1700 LET f=1: RETURN 

1710 IF aS(w)="Z" THEN RETURN 

1720 LET f£f=1: RETURN 


17230 FOR y=1l TO 30: FOR x=1 TO 


24: LET dS(y,x, TO 8)=" 0.00 
". LET ds(y,x,17)="0": LET d5(y 
;X., 18) =CHRS O: NEXT x: NEXT y 
1740 RESTORE 1750: FOR x=USR "a 
” TO USA "c"+7: READ a: POKE x, 
a: NEXT x: RETURN 

1750 DATA 8,8,8,8,8B,8,8,8 

1760 DATA 0,0,0,255,0,0,0,0 
1770 DATA 8,8,8,255,8,8,8,8 
1780 INPUT "NOME DO ARQUIVO 7”; 
n5 

1790 SAVE n$ DATA d5t) 

1800 PRINT 41:AT 0,0;" PRESSIONE 


V PARA VERIFICAR ” 

1810 PAUSE O: IF INKEYS="V” OR 
INKEYS="v" THEN GOTO 1830 
1820 RETURN 


1830 VERIFY n$ DATA d5S(): RETUR 
N 
LB40 INPUT "NOME DO ARQUIVO 7"; 


| = 
[| ln 
| NE | a) 
| 
| E 
The | 
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R | 
| ã ] 
| 
| 


ns 


1850 LOAD n$ DATA dS(): RETURN 


1490 PRINT €448:PRINT €448,;:IF 
LEN(DS(CC,CR))=1 THEN PRINTTNA 
DA A COPIAR" :SOUND 5,5:FOR K=1 
TO 500:NEXT:RETURN ELSE PRINT ” 
COPIA aBSOLUTA OU rELATIVA”; 


1500 AS=INKEYS:IF A$="" THEN 15 
00 

1510 IF A$=CHR$(13) THEN RETURN 
1520 IF AS="A” THEN TC=1:GOTO 1 
540 

1530 IF AS<>"R” THEN 1490 ELSE 
TC=0 

1540 PRINT 6448 

1550 IF TC=0 AND ASC(DS(CC,CR)) 


<>131 THEN PRINT €448," ERRADO 
MODO COPIA - SOMENTE EQUACOE 

9”: : SOUND 1,5:FOR D=1 TO 500:NE 

XT D:GOTO 490 

1560 PRINT €448:PRINT €448,"COP 
IA DE 1INHA OU cOLUNA”; 

1570 AS=INKEYS:IF AS="" THEN 15 
70 

1580 IF AS=CHRS (13) THEN RETURN 
1590 IF AS="C” THEN DC=1:GOTO 1 
610 

1600 IF ASS>"L” 
DC=0 

1610 PRINT €44B: PRINT €448,"COM 
ECAR PELA CELULA”;: INPUT AS:IF 

AS="" THEN RETURN 

1620 SlI=ASC(AS)-64:IF Sl<l OR 5 
1>25 THEN 1610 

1630 S2=VAL (MIDS (AS,2)):IF S2<l 
OR S2>30 THEN 1610 

1640 PRINT 6448: PRINT 6448," TER 
MINAR NA CELULA";: INPUT AS 

1650 IF A$="" THEN RETURN 

1660 ClI=ASC(AS)-64:IF ClI<l ORC 
1>25 THEN 1640 

1670 C2=VAL (MIDS(AS,2)):IF CZ2<1 
OR C2>30 THEN 1640 

1680 PRINT €448,"COPIANDO - E 
SPERE" 


THEN 1560 ELSE 





Cálculo dos resultados na tela do Spectrum. 


1690 IF TC=1 THEN 1970 

1700 IF DC=1 THEN 1840 

1710 IF C2<>52 THEN 2090 

1720 AS=ASC(MIDS (DS (CC,CR),2))- 
64:1IF AS<>26 AND AS+C1l-S12>25 TH 
EN Cl=25+51-AS 

1730 AS=ASC(MIDS (DS (CC,CR),5))- 
64:IF AS<>26 AND AS+Cl-Sl>25 TH 
EN Cl=25+5S1-AS 

1740 DS(S1,52)=DS(CC,CR) 

1750 FOR I=Sl+1l TO Cl 

1760 AS=DS(I-1,54) 


1770 IF MIDS(AS,2,1)="Z" THEN 1 


790 

1780 MIDS(A$S,2,1)=CHR$ (ASC(MIDS 
(AS,2,1))+1) 

1790 IF MIDS(AS,5,1)="Z" 
B1O 

1800 MIDS (AS,5,1)=CHRS (ASC(MID3 
(AS,5,1))+1) 

1810 DS(I,52)=AS:NEXT 

1820 IF C1>CX THEN CX=C4 

1830 GOTO 2080 

1840 IF Cl<>Sl THEN 2090 

1850 AS=VAL (MIDS (DS(CC,CR),3,2) 
)J:IF AS+C2-82>30 THEN C2=30+572- 
AS 

1860 AS=VAL (MIDS (DS (CC,CR),6)). 
IF AS+C2-52>30 THEN C2=30+52-AS 
1870 D5S(S1,52)=DS(CC,CR) 
1880 FOR I=52+1 TO C2 
1890 AS=DS(51,I-1) 

1900 IF MIDS(AS,2,1)="Z" 
920 

1910 V=VAL (MIDS (AS,3,2))J+1:IF VU 
<1l0 THEN MIDS(AS,3,2)=5TR$S(V) E 
LSE MIDS(AS,3,2)=MIDS(STRS(V),2 
2) 

1920 IF MIDS(AS,5,1)="2Z" 
940 

1930 V=VAL (MIDS(AS,6,2))+1:1IF V 
«10 THEN MIDS(AS,6,2)=5TRS(V) E 
LSE MIDS(AS,6,2)=MIDS(STRS(V),2 
2) 
1940 
1950 
1960 
1970 


THEN 1 


THEN 1 


THEN 1 


DS (81, I)=AS:NEXT 

IF C2>AX THEN AX=C2 
GoTo 2080 

IF DC=1 THEN 2030 
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19B0 IF C2<>CR THEN 2090 

1990 FOR I=CC+1l TO C1 

2000 DS(I,CR)=DS(I-1,CR):NEXT 
2010 IF Cl>CX THEN CX=C1 

2020 GOTO 2080 

2030 IF Cl<>CC THEN 2090 

2040 FOR I=CR+1 TO C2 

2050 DS(CC, I)=DS(CC,I-1L):NEXT 
2060 IF C2>RX THEN BRX=CZ2 

2070 GOTO 2080 

2080 MO=1:GOSUB 70:RETURN 

2090 PRINT 6448B,"erro NO DESTIN 
O”: SOUND 1,5:FOR D=1 TO 500:NEX 
TD 

2100 GOTO 2080 


1490 LOCATE 0,21:PRINTSPC(35):L 
OCATE 0,21:IF LEN(DS(CC,CR))=1 
THEN PRINT"NADA PARA COPIAR":FO 
R K=1 TO 500:NEXT:RETURN ELSE P 
RINT"CÓPIA <A>BSOLUTA OU <R>2ELA 
TIVA: “i: 

AS=INKEYS:IF AS="" THEN 15 


1500 

00 

1510 IF AS=CHR$S(13) THEN RETURN 
1520 IF AS="A”" THEN TC=1:GOTO 1 
540 

1530 IF AS<>"R” THEN 1490 ELSE 

TC=0 

1540 LOCATE 0,21:PRINTSPC(35):L 


OCATE 0,21 

1550 IF TC=0 AND ASC(DS(CC,CR)) 
<>131 THEN PRINT"MODO DE CÓPIA 
ERRADO - Só EQUAÇÕES!";:FOR D=1 
TO 500:NEXT:GOTO 490 

1560 LOCATE 0,21:PRINT"CÓPIA PO 
R <LINHA> OU <COLUNA?: 4 


1570 AS=INKEYS:IF A$="" THEN 15 
0 

1580 IF AS=CHR$(13) THEN RETURN 
1590 IF AS="C” THEN DC=1:GOTO 1 
610 

1600 IF AS<>"L” THEN 1570 ELSE 
DC=0 

1610 LOCATE 0,21: PRINTSPC(3/):L 


OCATE 0,21:PRINT"INICIA NA CELU 
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LA”; : INPUT AS:IF AS="" THEN RET 
URN 

1620 Sl=ASC(AS)-64:IF Sl<l OR 5 
1>25 THEN 1610 

1630 S2=VAL (MIDS (AS,2)):IF S2<l 
OR S2>30 THEN 1610 

1640 LOCATE 0,21:PRINTSPC(37):L 
OCATE 0,21:PRINT"TERMINA NA CEL 
ULA” ; : INPUT AS 

1650 IF AS="" THEN RETURN 

1660 ClI=ASC(AS)-64:IF Cl<l OR € 
1>25 THEN 1640 

1670 C2=VAL (MIDS(AS,2)):IF C2<l 
OR C2>30 THEN 1640 

1680 LOCATE 0,21:PRINTSPC(35):L 
OCATE 0,21:PRINT"COPIANDO... AG 
UARDE” 

1690 IF TC=1 THEN 1970 

1700 IF DC=1 THEN 1840 

1710 IF C2<>582 THEN 2090 

1720 AW=ASC (MIDS (DS (CC,CR),2))- 
64:1IF AW<>26 AND AW+C1-S1>25 TH 
EN Cl=25+S51-AW 

1730 AW=ASC (MIDS (DS (CC,CR),5))- 
64:IF AW<>26 AND AW+C1-S1>25 TH 
EN C1l=25+51-AW 

1740 DS(8S1,82)=DS(CC,CR) 
1750 FOR I=S1+1 TO Cl 
1760 AS=DS(I-1,52) 

1770 IF MIDS(AS,2,1)="Z" 
790 : 
1780 MIDS (AS,2,1)=CHRS (ASC(MIDS 
(AS,2,1))+1) 

1790 IF MIDS(AS,5,1)="Z" 
810 

1800 MIDS (A$S,5,1)=CHRS (ASC(MIDS 
(AS,5,1))+1) 


THEN 1 


THEN 1 


1810 DS (1,82) =AS:NEXT 

1820 IF C1l2CX THEN CX=C1 

1830 GOTO 2080 

1840 IF Cl<>81 THEN 2090 

1850 AW=VAL (MIDS(DS(CC,CR), 3,2) 
)J:IF AW+C2-582>230 THEN C2=30+52- 
AW 


AW=VAL (MIDS (DS (CC, CR),6)): 
IF AW+C2-82>30 THEN C2=30+52-AW 
1870 D$(S1,582)=DS(CC,CR) 
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18B0 FOR I=S2+1 TO C2 

1890 AS$=DS(S1,I-1) 

1900 IF MIDS(AS,2,1)="Z” THEN 1 
920 

1910 V=VAL (MIDS(AS,3,2))+1:IF V 
<10 THEN MIDS(AS,3,2)=STBS(V) E 
LSE MIDS(AS,3,2)=MIDS(STRS(V),2 


12) 

1920 IF MIDS(AS,5,1)="Z” THEN 1 
940 

1930 V=VAL (MIDS(AS,6,2))+1:1IF V 
<10 THEN MIDS(AS,6,2)=STRS(V) E 
LSE MIDS(AS,6,2)=MIDS(STRS(V),2 
12) 
1940 
1950 
1960 
1970 
1980 
1990 
2000 
2010 
2020 
2030 
2040 


DS (Sl, I)J=AS:NEXT 

IF C2>RX THEN RX=C2Z 

GOTO 2080 

IF DC=1 THEN 2030 

IF C2<>CR THEN 2090 

FOR I=CC+1 TO Cl 

DS (I,CR)=D$(1-1,CR):NEXT 
IF Cl>CX THEN CX=C1 

GOTO 2080 

IF Cl<>CC THEN 2090 

FOR I=CR+1 TO C2 

2050 DS(CC,I)=DS(CC,1I-1):NEXT 
2060 IF C2>RX THEN RX=C2 

2070 GOTO 2080 

2080 MO=1:GOSUB 70:RETURN 

2090 LOCATE 0,21:PRINTSPC(35):L 
OCATE 0,21:PRINT"ERRO NA DESTIN 
AÇÃO" :FOR D=1 TO 500:NEXTD 

2100 GOTO 2080 


1490 VTAB 23: HTAB 1: CALL - 


958: IF JLEN (DS(CC,CR)) = | TH 
EN PRINT "NADA PARA COPIAR”; C€ 


HAS (7);: FOR K = 1 TO 1000: NE 
XT : RETURN 

1495 PRINT "COPIA [AJBSOLUTA O 
U [RJELATIVA ”"; 

1500 GET AS 

1510 TF AS = CHRS (13) THEN 2 
085 

1520 IF AS = "A" THEN TC = il: 
GOTO 1540 

1530 IF AS < > "Aº THEN IA4SO 
1535 TC = 0 

1540 VTAB 23: HTAB 1: CALL - 
958 

1550 TF TC = O AND ASC (DS(CC 
«CR)) < > 131 THEN PRINT "MOD 


O DE COPIA INCORRETO - SO EQUAC 


OES"; CHRS (7);: FORD = 1 TO 1 
000: NEXT Goro 490 

1560 VTAB 23: HTAB 1: CALL — 

958: PRINT "COPIA [CJOLUNA OU [1 
LJINHA ”; 

1570 GET AS 

1580 IF AS = CHR$ (13) THEN 2 
085 

1590 IF AS = "C” THEN DC = l: 

GOTO 1610 

1600 IF AS < > "L” THEN 1560 

1605 DC = 0 

1610 VTAB 23: HTAB 1: CALL - 


958: PRINT "COMECA NA CEL.: ":: 
INPUT AS: IF AS = "" THEN 2085 
IF Sl 


1620 Sl = ASC (AS) - 64: 


< 1 OR Sl > 25 THEN I6IO 
1630 52 = VAL ( MIDS (AS,2)): 
IF S2< 1 OR S2 > 30 THEN 1610 
1640 VTAB 23: HTAB 1: CALL - 
958: PRINT "TERMINA NA CEL.: *; 
INPUT AS 
1650 IF AS = "*" THEN 2085 
1660 Cl = ASC (AS) - 64: 
< 1 0RCl> 25 THENJI6dO 
1670 C2 = VAL ( MIDS (AS,2)): 
IF C2 < 1 OR c2 > 30 THEN 1640 
1680 VTAB 23: HTAB 1: CALL - 
958: PRINT "COPIANDO - AGUARDE. 


Fa 
' 


1690 
1700 
1710 IF €2 


IF Cl 


IF TC = 1 THEN 1970 
IF DC = 1 THEN 1840 


< > 82 THEN 2090 
1720 AS = ASC ( MIDS (DS(CC,CR 
)J,2)) - 64: IF AS < > 26 AND À 

8 + C) - 8) > 25 THEN Cl = 25 + 
Si - AS 

1730 AS = ASC ( MIDS (DS(CC,CR 
),5)) - 64: IF AS < > 26 AND A 

8 + Cl - 81 > 25 THEN Cl = 25 + 
Sl - AS 

1740 D$(S1,82) = DS(CC,CR) 

1750 FOR I =Sl+1TOCcl 

1760 AS = DS(I - 1,82) 


1770 IF MIDS (AS,2,1) = "Z" T 

HEN 1790 

1780 AS = LEFTS (AS,1) + CHARS 
( ASC ( MIDS (A$S,2,1)) + 1) + 
MIDS (AS,3) 

1790 IF MIDS (AS,5,1) = "Z" T 

HEN 1810 

1800 AS = JLEFTS (A$S,4) + CHR$S 
( ASC ( MIDS (AS,5,1)) + 1) + 
MIDS (AS,6) 

1810 DS(1,82) = AS: NEXT 

1820 IF Cl > CX THEN CX = Cl 
1830 GOTO 2080 

1840 IF Cl < > SlTHENHZO9SO 
1850 AS = VAL ( MIDS (DS(CC,CR 
ode js LF AS + Cl = :;B2:> 307 

HEN C2 = 30 + 82 - AS 

1860 AS = VAL ( MIDS (DS(CC,CR 


),6)): IF AS + C2 - 52 > 30 THE 
NC2 = 30+ 52 - AS 

1870 D$(81,52) = DS(CC,CR) 
1880 FORT =S2+1TOc2 
1890 AS = DS(S1L,I - 1) 
1900 IF MIDS (A$,2,1) = 
HEN 1920 


1910 UV = VAL ( MIDS (A5S,3,2)) 

+ 1: IF V < 10 THEN AS = LEFTS 
(AS,2) + * * + STRS (UV) + Mi 

DS (A$,5): GOTO 1920 

1915 AS = LEFTS (A$S,2) + 


1920 IF MIDS (AS,5,1) = 

HEN 1940 

1930 V = VAL ( MIDS (A$S,6,2)) 

+ 1: IF V < 10 THEN AS = LEFTS 
(A$,5) +” " + STARS (V) + Mi 


DS (AS,8): GOTO 1920 

1935 AS = LEFTS (A$,5) + STR$S 
(V) + MIDS (AS,8B) 

1940 D$(Sl,1) = AS: NEXT 

1950 IF C2 > RX THEN AX = C2. 

1960 GOTO 2080 


de E 


STRS 


pet A mn 


O que é uma planilha integrada? 

Os usuários de microcomputadores 
com maior disponibilidade de memória 
RAM — entre eles os da linha PC e al- 
guns modelos da linha Apple — podem 
ter o privilégio de utilizar os programas 
integrados de planilha eletrônica. Eles 
recebem esta denominação por incluf- 
rem, além do programa de planilha de 
cálculo propriamente dito, outros pro- 
gramas, como os de elaboração de grá- 
ficos (a partir dos dados da planilha), 


| montagem e gestão de bancos de da- 


dos relacionais, e, em alguns tipos, pro- 


| cessamento de texto. 


A grande vantagem de sistemas 
desse tipo é a perfeita integração de da- 
dos em cada uma das aplicações. Além 
disso, eles tornam dispensável trocar 
programas, quando se deseja utilizar 
um outro aplicativo. 

Para os micros da linha Apple que | 
têm memória RAM de 128 Kbytes ou | 
mais, já existe um pacote integrado: O 
Totalworks. Mas os pacotes mais di- 
fundidos são os disponíveis para os mi- 
cros da linha PC (de dezesseis bits), tais 
como o Lotus 1-2-3, 0 Framework e O 
Symphony. 


1] THEN 2030 


19720 TF DO = 

1980 IF CZ s > CR THEN 2090 
1990 FOR T=cCc+a1Ii TOC 

2000 DS(I,CR) = DS(I - 1,CR): N 
EXT 

2010 IF Cl > CX THEN CX =cCIl 
2020 GOTO 2080 

“090 TE Cl< 5 CC THEN 2090 
2040 FOR I = CRA+I1TOcCZ 

2050 DS(CC,I) = DS(CC,I — à): N 
EXT 

2060 IF C2 > nX THEN BX = CZ 
2070 GOTO 2080 

2080 MO = 1: GOSUB 70 

2085  UTAR 23: HTAB 1: CALL - 
958: RETURN 

2090 VTAB 23: HBTAB 1: CALL —- 
958: PRINT "ERRO NA DESTINACAÃO” 
- FOR D = 1 TO 1000: NEXT 

2100 GOTO 2080 

2500 IEF PEEK (222) = 5 THEN 
Goto 1470 

2510 END 

3000 HOME PRINT "TERMINO O P 
ROGRAMA? (S/N) ";: GET AS 

3010 IF AS < > "S” THEN GOSU 
B 70: RETURN 

3020 END 









LINHA 


Apple Il + 

Apple Il+ 
Apple Il + 
Apple Il + 
Apple Il + 
Apple ll + 
Apple + 
Apple ll+ 
Apple Il + 
Apple + 
Apple + 
Apple + 
Apple ll+ 
Apple ll + 
Apple ll+ 
Apple ll + 
Apple Il + 
Apple ll + 
Apple Il + 
Apple + 
Apple Hl+ 
Apple Il + 

Apple Il + 
Apple ll + 
Apple ll + 
Apple ll + 
Apple Il + 
Apple ll+ 
Apple lle 

Apple Ile 


Apple Ile 
MSX 


MSX 


FABRICANTE Po 


Appletronica 
CCE 

CPA 

CPA 

Digitus 
Dismac 
ENIAC 
Franklin 
Houston 
Magnex 
Maxitronica 
Maxitronica 
Maxitronica 
Maxitronica 
Microcraft 
Milmar 
Milmar 
Milmar 
Omega 
Polymax 
Polymax 
Spectrum 
Spectrum 
Suporte 
Sycomig 
Unitron 
Victor do Brasil 
Victor do Brasil 
Microcraft 
Microdigital 
Spectrum 
Gradiente 
Sharp 


MODELO 


Thor 2010 
MC-4000 Exato 
Absolutus 


| Polaris 


DGT-AP 
D-8100 
ENIACII 
Franklin 
Houston AP 
DMII 
MX-2001 
MX-48 

MX.64 
Maxitronic | 
Crafll Plus 
Apple Il Plus 
Apple Master 
Apple Senior 
MC-400 
Maxxi 

Poly Plus 
Microengenho | 
Spectrum ed 
Venus ll 

SICI 

API 

Elppa ll Plus 
Elppa Jr. 
Craftlle 
TK-3000 He 


"Microengenho ll 


Expert GPC4 
Hotbit HB-8000 


FABRICANTE 


Appletronica 
Apply 

CCE 

CPA 

CPA 
Codimex 
Digitus 
Digitus 
Digitus 
Dismac 
Dismac 
Dismac 
Dynacom 
ENIAC 
Engebras 
Filcres 
Pranklin 
Gradiente 
Houston 
Kemitron 
LNW 

LZ 

Magnex 
Maxitronica 
Maxitronica 
Maxitronica 
Maxitronica 
Microcraft 
Microcraft 
Microdigital 
Microdigital 
Microdigital 
Microdigital 


MODELO 


Thor 2010 
Apply 300 
MC-4000 Exato 
Absolutus 
Polaris 
CS-6508 
DGT100 
DGT-1000 
DGT.AP 
D-8000 
D-8001/2 
D-8100 
MX1600 
ENIACII 
AS+1000 
NEZ-8000 
Franklin 
Expert GPC1 
Houston AP 
Naja 800 
LNW-B0 
Color 64 
DMI 
MX-2001 
MX-48 
MX-64 
Maxitronic | 
Craft ll Plus 
Caftlle 
TK-3000 Ile 
TK-82C 
TK-83 

TK-85 


PAÍS 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 


Brasil 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
USA 

Brasil 
Brasil 
Brasil 
USA 

Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 


LINHA 


Apple Il+ 


o Sinclair ZX-81 


Apple ll + 
Apple + 
Apple ll + 
TRS-Color 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
Apple + 
TRS-80 Mod.! 
TRS-80 Mod. 
Apple ll + 
TRS-Color 
Apple ll+ 
Sinclair ZX-81 
Sinclair ZX-81 
Apple ll + 
MSX 

Apple Il + 
TRS-80 Mod.lll 
TRS-80 Mod. | 
TRS-Color 
Apple Il + 
Apple Il + 
Apple Il + 
Apple Il + 
Apple ll + 
Apple Il+ 
Apple lle 
Apple lle 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 


Microdigital TK-90X Brasil 
Microdigital TKS-800 Brasil 


Sinclair Spectrum | 
TRS-Color 


Microdigital TK-90X 
Timex 2000 


Sinclair Spectrum 
Sinclair Spectrum Timex 


Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
Sinclair ZX-81 
TRS-80 Mod.I 
TRS-80 Mod. | 
TRS-80 Mod. | 
TRS-80 Mod.! 
TRS-80 Mod.lil 
TRS-BO Mod.il 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
TRS-80 Mod.lil 
TRS-80 Mod.lll 
TRS-80 Mod.lil 
TRS-80 Mod.IV 
TRS-80 Mod.IlV 
TRS-Color 
TRS-Color 
TRS-Color 
TRS-Color 
TRS-Color 


Apply 
Engebras 


“Filcres 


Microdigital 
Microdigital 
Microdigital 
Prologica 
Ritas 

Timex 
Timex 
Dismac 
Dismac 
LNW 

Video Genie 
Digitus 
Digitus 
Kemitron 
Prologica 
Prologica 
Sysdata 
Sysdata 
Multix 
Sysdata 
Codimex 
Dynacom 
LZ 
Microdigital 
Prologica 


Apply 300 
AS41000 
NEZ-8000 
TK-B2C 
TK-83. 
TK-85 
CP-200 
Ringo R-470 
Timex 1000 
Timex 1500 
D-8000 | 
D-8001/2 
LNW-80 
Video Genie | 
DGT100 
DGT-1000 
Naja 800 
CP-300 
CP-500 
Sysdata Ill 
Sysdata Jr. 
MX-Compacto 
Sysdata IV 
CS-6508 
MX-1600 
Color 64 
TKS-800 
CP-400 


Milmar 
Milmar 


“Milmar 


Multix 
Omega 
Polymax 
Polymax 
Prologica 
Prologica 
Prologica 
Prologica 
Ritas 

Sharp 
Spectrum 
Spectrum 
Spectrum 
Suporte 
Sycomig 
Sysdata 
Sysdata 
Sysdata 
Timex 
Timex 
Timex 
Unitron 
Victor do Brasil 
Victor do Brasil 
Video Genie 


Apple ll Plus 
Apple Master 
Apple Senior 
MX-Compacto 
MC-400 

Maxxi 

Poly Plus 
CP-200 

CP-300 

CP-400 

CP.500 

Ringo R-470 
Hotbit HB-8000 
Microengenho | 
Microengenho Il 
Spectrum ed 
Venus ll 

SICI 

Sysdata Ill 
Sysdata IV 
Sysdata Jr. 
Timex 1000 
Timex 1500 
Timex 2000 
APII 

Elppa Il Plus 
Elppa Jr. 

Video Genie! 


Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
Brasil 
USA 

USA 

USA 

Brasil 
Brasil 
Brasil 
USA 


Apple Il + 
Apple ll + 
Apple Il + 
TRS-B0 Mod.IV 
Apple Il + 
Apple Il + 
Apple l+ 
Sinclair ZX-81 
TRS-80 Mod.Ill 
TRS-Color 
TRS-80 Mod.lll 
Sinclair ZX-81 
MSX 

Apple Il+ 
Apple Ile 
Apple l+ 
Apple Il + 
Apple Il + 
TRS-80 Mod. 
TRS-80 Mod.IV 
TRS-80 Mod.lll 
Sinclair ZX-81 
Sinclair ZX-81 


Sinclair Spectrum 


Apple Il + 
Apple Il + 
Apple ll+ 
TRS-80 Mod. | 


EN an Tin macas 
é, UM LOGUTIE SI qi , 


“INPUT foi especialmente projetado para PN 
“ microcomputadores compatíveis com as sete principais Sinclair E TARSO TK:2000 MSX 


“linhas existentes no mercado. 
ba, então emp a sr 


“Os blocos de textos e listagens de programas po pera 
Eme renes E UM [06] Semp e 
; identificados por meio dos seguintes sim os: TRS-Color pune dl 


ED Dm me eee mo meto mm o em em 





INaaNO PRÓXIMO NÚMEROHHEEERII! 








PROGRAMAÇÃO BASIC 


Famílias de curvas. Envoltórias. Focos e cúspides. Padrões 
de pontos. Ressonância. Caos. Dinâmica de populações. 


CÓDIGO DE MÁQUINA 


Avalanche: as quatro partes da rotina de salto. 
Efeitos sonoros. Ajustamento dos apontadores de tela. 


PROGRAMAÇÃO BASIC 


Tipos de modelo. Probabilidade e comportamento aleatório. 
Simulações. Tipos de distribuição. Comparação de eventos. 





